Skip to content

Commit

Permalink
update html
Browse files Browse the repository at this point in the history
  • Loading branch information
@alex-thomson222
alex-thomson222 committed Nov 14, 2023
1 parent 83a1ca0 commit 1a0ad82
Showing 1 changed file with 28 additions and 28 deletions.
56 changes: 28 additions & 28 deletions index.html
View file
Original file line number Diff line number Diff line change
Expand Up @@ -164,7 +164,7 @@ <h2>Exercises</h2>
following along to here directly from the workbook you may have already
done this; so you can skip this step!). You can find the Excel file
here: <a
href="https://github.com/stats4sd/r2020_04Importation/raw/main/Happiness.xlsx">Happiness.xlsx</a></p></li>
href="https://github.com/stats4sd/RCourse_2023_download_files/raw/dev/Happiness.xlsx">Happiness.xlsx</a></p></li>
<li><p>Find the 5 countries with the lowest ‘generosity scores’</p></li>
<li><p>Produce a subset of countries which have below average scores for
both GDP and generosity.</p></li>
Expand All @@ -174,7 +174,7 @@ <h2>Exercises</h2>
<p><strong>Exercise 2: Download the file below that contains the imdb
dataset and the Module 3 exercises in RMD format.</strong></p>
<p><a
href="https://github.com/stats4sd/r2020_04Quiz/raw/main/Module%203%20Exercises.zip">Module-3-Exercises.zip</a></p>
href="https://github.com/stats4sd/RCourse_2023_download_files/raw/dev/Module%203%20Exercises.zip">Module-3-Exercises.zip</a></p>
<p>Create a new project in RStudio and unzip the files into your new
project folder.</p>
<p>Then open the workbook, and load in the libraries and the dataset.
Expand Down Expand Up @@ -364,22 +364,22 @@ <h2>Appendix: Useful reference links</h2>

<script type="application/shiny-prerendered" data-context="server">
learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label = "Q1", question = structure("Which of these statements is true?", html = TRUE, class = c("html",
"character")), answers = list(structure(list(id = "lnr_ans_39f2698",
"character")), answers = list(structure(list(id = "lnr_ans_d66d284",
option = "RStudio is useless without R", value = "RStudio is useless without R",
label = structure("RStudio is useless without R", html = TRUE, class = c("html",
"character")), correct = TRUE, message = NULL, type = "literal"), class = c("tutorial_question_answer",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_d19ff2f",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_e64e8c9",
option = "R is a powerful Interactive Development Environment",
value = "R is a powerful Interactive Development Environment",
label = structure("R is a powerful Interactive Development Environment", html = TRUE, class = c("html",
"character")), correct = FALSE, message = structure("No, RStudio is the IDE", html = TRUE, class = c("html",
"character")), type = "literal"), class = c("tutorial_question_answer",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_d9fff3a",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_91a79a7",
option = "Without RStudio, you cannot use R", value = "Without RStudio, you cannot use R",
label = structure("Without RStudio, you cannot use R", html = TRUE, class = c("html",
"character")), correct = FALSE, message = structure("R can work very well without RStudio. It’s just not that user friendly", html = TRUE, class = c("html",
"character")), type = "literal"), class = c("tutorial_question_answer",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_feb3329",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_de01066",
option = "You need to install RStudio first, then you can install R",
value = "You need to install RStudio first, then you can install R",
label = structure("You need to install RStudio first, then you can install R", html = TRUE, class = c("html",
Expand All @@ -392,55 +392,55 @@ <h2>Appendix: Useful reference links</h2>
"character")), incorrect = structure("Incorrect", html = TRUE, class = c("html",
"character")), message = NULL, post_message = NULL), ids = list(
answer = "Q1-answer", question = "Q1"), loading = NULL, random_answer_order = TRUE,
allow_retry = TRUE, seed = 1468672435.3161, options = list()), class = c("learnr_radio",
allow_retry = TRUE, seed = 1832771916.14655, options = list()), class = c("learnr_radio",
"tutorial_question")), session = session)
</script>


<script type="application/shiny-prerendered" data-context="server">
learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label = "Q2", question = structure("Why is R giving an error in the above screenshot?", html = TRUE, class = c("html",
"character")), answers = list(structure(list(id = "lnr_ans_6653521",
"character")), answers = list(structure(list(id = "lnr_ans_136cf0e",
option = "The command for reading the data is missing", value = "The command for reading the data is missing",
label = structure("The command for reading the data is missing", html = TRUE, class = c("html",
"character")), correct = FALSE, message = structure("No, it is present at the top of the file: Pulse &lt;- read.csv(‘Pulse.csv’)", html = TRUE, class = c("html",
"character")), type = "literal"), class = c("tutorial_question_answer",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_3bc7494",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_23909c4",
option = "The command library(ggplot2) is missing", value = "The command library(ggplot2) is missing",
label = structure("The command library(ggplot2) is missing", html = TRUE, class = c("html",
"character")), correct = FALSE, message = structure("It is missing, but we don’t need it, since we are not plotting anything", html = TRUE, class = c("html",
"character")), type = "literal"), class = c("tutorial_question_answer",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_736ddf7",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_435ed0c",
option = "We did not specify the name of our summary statistic",
value = "We did not specify the name of our summary statistic",
label = structure("We did not specify the name of our summary statistic", html = TRUE, class = c("html",
"character")), correct = FALSE, message = structure("It’s good practice to name our summary statistics indeed, but ommiting the name is not an ‘error’", html = TRUE, class = c("html",
"character")), type = "literal"), class = c("tutorial_question_answer",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_73eede7",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_fc210d1",
option = "The column names are incorrect", value = "The column names are incorrect",
label = structure("The column names are incorrect", html = TRUE, class = c("html",
"character")), correct = FALSE, message = structure("No, the column names are correct", html = TRUE, class = c("html",
"character")), type = "literal"), class = c("tutorial_question_answer",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_5632b26",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_67d00f8",
option = "Pipes don't work within R chunks", value = "Pipes don't work within R chunks",
label = structure("Pipes don’t work within R chunks", html = TRUE, class = c("html",
"character")), correct = FALSE, message = structure("pipes work very well within R chunks", html = TRUE, class = c("html",
"character")), type = "literal"), class = c("tutorial_question_answer",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_10c1882",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_565260",
option = "The project file was not created", value = "The project file was not created",
label = structure("The project file was not created", html = TRUE, class = c("html",
"character")), correct = FALSE, message = structure("We can’t tell from this screenshot whether a project file was created or not. We can say that it cannot be responsible for the error though.", html = TRUE, class = c("html",
"character")), type = "literal"), class = c("tutorial_question_answer",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_4e688d7",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_86b6178",
option = "The command library(dplyr) is missing", value = "The command library(dplyr) is missing",
label = structure("The command library(dplyr) is missing", html = TRUE, class = c("html",
"character")), correct = TRUE, message = NULL, type = "literal"), class = c("tutorial_question_answer",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_977fbe7",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_19b1536",
option = "The symbol used for the pipe operator is wrong",
value = "The symbol used for the pipe operator is wrong",
label = structure("The symbol used for the pipe operator is wrong", html = TRUE, class = c("html",
"character")), correct = FALSE, message = structure("%&gt;% is the right symbol for the pipe operator", html = TRUE, class = c("html",
"character")), type = "literal"), class = c("tutorial_question_answer",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_3d0ee33",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_d1e3975",
option = "We are using pipes, but the data argument of each function is missing",
value = "We are using pipes, but the data argument of each function is missing",
label = structure("We are using pipes, but the data argument of each function is missing", html = TRUE, class = c("html",
Expand All @@ -453,30 +453,30 @@ <h2>Appendix: Useful reference links</h2>
"character")), incorrect = structure("Incorrect", html = TRUE, class = c("html",
"character")), message = NULL, post_message = NULL), ids = list(
answer = "Q2-answer", question = "Q2"), loading = NULL, random_answer_order = TRUE,
allow_retry = TRUE, seed = 1908256421.1114, options = list()), class = c("learnr_radio",
allow_retry = TRUE, seed = 358763236.332938, options = list()), class = c("learnr_radio",
"tutorial_question")), session = session)
</script>

<script type="application/shiny-prerendered" data-context="server">
learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label = "Q3", question = structure("The above R Markdown file runs fine, but is missing the point of using R Markdown. Why?", html = TRUE, class = c("html",
"character")), answers = list(structure(list(id = "lnr_ans_8449718",
"character")), answers = list(structure(list(id = "lnr_ans_5b9c4ca",
option = "The comments should be part of the text outside the R chunks. That way, an R Markdown document can become a proper report",
value = "The comments should be part of the text outside the R chunks. That way, an R Markdown document can become a proper report",
label = structure("The comments should be part of the text outside the R chunks. That way, an R Markdown document can become a proper report", html = TRUE, class = c("html",
"character")), correct = TRUE, message = NULL, type = "literal"), class = c("tutorial_question_answer",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_cdc45d2",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_b57651f",
option = "With R Markdown, all the libraries are already preloaded, so there's no need to have commands that load libraries!",
value = "With R Markdown, all the libraries are already preloaded, so there's no need to have commands that load libraries!",
label = structure("With R Markdown, all the libraries are already preloaded, so there’s no need to have commands that load libraries!", html = TRUE, class = c("html",
"character")), correct = FALSE, message = structure("No, you still need to load libraries in an R Markdown file", html = TRUE, class = c("html",
"character")), type = "literal"), class = c("tutorial_question_answer",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_2a06a0a",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_619ab24",
option = "R Markdown is made for writing R code. Ideally, we shouldn't have any text or comment in such document, so that it is reproducible",
value = "R Markdown is made for writing R code. Ideally, we shouldn't have any text or comment in such document, so that it is reproducible",
label = structure("R Markdown is made for writing R code. Ideally, we shouldn’t have any text or comment in such document, so that it is reproducible", html = TRUE, class = c("html",
"character")), correct = FALSE, message = structure("No, the advantage of R Markdown is that it is great for writing reproducible reports. So it should contain text", html = TRUE, class = c("html",
"character")), type = "literal"), class = c("tutorial_question_answer",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_6593090",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_804cfae",
option = "The commands should all be included in the same R chunk, so that they can be run altogether. That's the beauty of R Markdown!",
value = "The commands should all be included in the same R chunk, so that they can be run altogether. That's the beauty of R Markdown!",
label = structure("The commands should all be included in the same R chunk, so that they can be run altogether. That’s the beauty of R Markdown!", html = TRUE, class = c("html",
Expand All @@ -489,33 +489,33 @@ <h2>Appendix: Useful reference links</h2>
"character")), incorrect = structure("Incorrect", html = TRUE, class = c("html",
"character")), message = NULL, post_message = NULL), ids = list(
answer = "Q3-answer", question = "Q3"), loading = NULL, random_answer_order = TRUE,
allow_retry = TRUE, seed = 68550497.9680787, options = list()), class = c("learnr_radio",
allow_retry = TRUE, seed = 1371941672.36114, options = list()), class = c("learnr_radio",
"tutorial_question")), session = session)
</script>


<script type="application/shiny-prerendered" data-context="server">
learnr:::question_prerendered_chunk(structure(list(type = "learnr_checkbox", label = "Q4", question = structure("What is important for your data if you want to import it into R? (select all that apply)", html = TRUE, class = c("html",
"character")), answers = list(structure(list(id = "lnr_ans_8b5b744",
"character")), answers = list(structure(list(id = "lnr_ans_8951b6e",
option = "It should be made of one single rectangle of data",
value = "It should be made of one single rectangle of data",
label = structure("It should be made of one single rectangle of data", html = TRUE, class = c("html",
"character")), correct = TRUE, message = NULL, type = "literal"), class = c("tutorial_question_answer",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_bafde46",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_d647a0e",
option = "The column names should lie in one row only", value = "The column names should lie in one row only",
label = structure("The column names should lie in one row only", html = TRUE, class = c("html",
"character")), correct = TRUE, message = NULL, type = "literal"), class = c("tutorial_question_answer",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_53f0e14",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_e12bf7d",
option = "There shouldn't be any gap between rows or columns",
value = "There shouldn't be any gap between rows or columns",
label = structure("There shouldn’t be any gap between rows or columns", html = TRUE, class = c("html",
"character")), correct = TRUE, message = NULL, type = "literal"), class = c("tutorial_question_answer",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_2aa8d62",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_f7fa2b5",
option = "All the columns should have the same length, and the same for the rows",
value = "All the columns should have the same length, and the same for the rows",
label = structure("All the columns should have the same length, and the same for the rows", html = TRUE, class = c("html",
"character")), correct = TRUE, message = NULL, type = "literal"), class = c("tutorial_question_answer",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_a4e48cb",
"tutorial_quiz_answer")), structure(list(id = "lnr_ans_8867420",
option = "It shouldn't contain any merged cells", value = "It shouldn't contain any merged cells",
label = structure("It shouldn’t contain any merged cells", html = TRUE, class = c("html",
"character")), correct = TRUE, message = NULL, type = "literal"), class = c("tutorial_question_answer",
Expand All @@ -526,7 +526,7 @@ <h2>Appendix: Useful reference links</h2>
"character")), incorrect = structure("Incorrect", html = TRUE, class = c("html",
"character")), message = NULL, post_message = NULL), ids = list(
answer = "Q4-answer", question = "Q4"), loading = NULL, random_answer_order = TRUE,
allow_retry = TRUE, seed = 1833733690.6461, options = list()), class = c("learnr_checkbox",
allow_retry = TRUE, seed = 462875113.784457, options = list()), class = c("learnr_checkbox",
"tutorial_question")), session = session)
</script>
</p>
Expand Down

0 comments on commit 1a0ad82

Please sign in to comment.