diff --git a/tutorial_page.Rmd b/tutorial_page.Rmd index 53451f8366d08a15d4c751260e19bed6fee0824c..3214ca86bb3c1ab215944f2f0ad8597bb7d7874c 100644 --- a/tutorial_page.Rmd +++ b/tutorial_page.Rmd @@ -318,7 +318,8 @@ plot(, , pch = 16, col = "blue") ### Hypothesentest -R hat Funktionen zum Testen von Hypothesen. Hier kann man nun den [T-Test](https://www.rdocumentation.org/packages/stats/versions/3.6.2/topics/t.test) anwenden. In der Funktion ```t.test()``` werden die beiden Wertesets eingegeben. Der ausgegebene p-Wert (p-value) kann dann mit dem Signifikanzwert (typischerweise 5%(0.05)) verglichen werden. Ist der Wert groesser als 0.05 kann man annehmen, dass die Hypothese stimmt. Einen Testdurchschnitt kann man mit dem Parameter ```mu={value}``` angeben. +R hat Funktionen zum Testen von Hypothesen. Hier kann man nun den [T-Test](https://www.rdocumentation.org/packages/stats/versions/3.6.2/topics/t.test) anwenden. In der Funktion ```t.test()``` werden die beiden Wertesets eingegeben. Der ausgegebene p-Wert (p-value) kann dann mit dem Signifikanzwert (typischerweise 5%(0.05)) verglichen werden. Ist der Wert groesser als 0.05 kann man annehmen, dass die Null-Hypothese stimmt.\ +Die Alternative Hypothese, oder das, was man eigentlich beweisen will, wird ebenfalls im Bericht gezeigt. Einen Testdurchschnitt kann man mit dem Parameter ```mu={value}``` angeben. ```{r hypothesis-test, exercise=TRUE, exercise.lines=4} ptime <- gameData$"Play Time" diff --git a/tutorial_page.html b/tutorial_page.html index fde7074902dd6ff4fd9283199e69a39310b9e62a..f25883d4433a7591467b77379abae59b996f7cfb 100644 --- a/tutorial_page.html +++ b/tutorial_page.html @@ -1250,19 +1250,19 @@ learnr:::store_exercise_cache(structure(list(label = "replace-special-chars", gl <script type="application/shiny-prerendered" data-context="server"> learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label = "second-quiz-1", question = structure("Mit welchem R-Befehl lassen sich Packages installieren?", html = TRUE, class = c("html", - "character")), answers = list(structure(list(id = "lnr_ans_ea53d19", + "character")), answers = list(structure(list(id = "lnr_ans_dc0bb48", option = "install.packages()", value = "install.packages()", label = structure("install.packages()", 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_14679b", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_c274918", option = "add.packages()", value = "add.packages()", label = structure("add.packages()", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", - "tutorial_quiz_answer")), structure(list(id = "lnr_ans_341624c", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_26c3c43", option = "install.library()", value = "install.library()", label = structure("install.library()", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", - "tutorial_quiz_answer")), structure(list(id = "lnr_ans_be31cc5", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_72e878c", option = "install()", value = "install()", label = structure("install()", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", "tutorial_quiz_answer"))), button_labels = list(submit = structure("<span data-i18n=\"button.questionsubmit\">Submit Answer<\u002fspan>", html = TRUE, class = c("html", @@ -1273,7 +1273,7 @@ learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label "character")), message = NULL, post_message = NULL), ids = list( answer = "second-quiz-1-answer", question = "second-quiz-1"), loading = NULL, random_answer_order = FALSE, allow_retry = FALSE, - seed = 1657602708.22812, options = list()), class = c("learnr_radio", + seed = 1458296632.32093, options = list()), class = c("learnr_radio", "tutorial_question")), session = session) </script> @@ -1281,16 +1281,16 @@ learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label <script type="application/shiny-prerendered" data-context="server"> learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label = "second-quiz-2", question = structure("Mit welchem R-Befehl lassen sich die installierten Packages initialisieren?", html = TRUE, class = c("html", - "character")), answers = list(structure(list(id = "lnr_ans_9ae1f26", + "character")), answers = list(structure(list(id = "lnr_ans_487bbc2", option = "use()", value = "use()", label = structure("use()", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", - "tutorial_quiz_answer")), structure(list(id = "lnr_ans_4341b3", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_8e72ca8", option = "library()", value = "library()", label = structure("library()", 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_256057d", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_faf2e64", option = "init()", value = "init()", label = structure("init()", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", - "tutorial_quiz_answer")), structure(list(id = "lnr_ans_474fbb9", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_2544cb", option = "install.packages()", value = "install.packages()", label = structure("install.packages()", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", @@ -1302,24 +1302,24 @@ learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label "character")), message = NULL, post_message = NULL), ids = list( answer = "second-quiz-2-answer", question = "second-quiz-2"), loading = NULL, random_answer_order = FALSE, allow_retry = FALSE, - seed = 4933800.49770252, options = list()), class = c("learnr_radio", + seed = 225670811.394914, 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 = "second-quiz-3", question = structure("Welcher Packet benutzen wir, um XLSX-Dateien zu lesen?", html = TRUE, class = c("html", - "character")), answers = list(structure(list(id = "lnr_ans_391f028", - option = "readxl()", value = "readxl()", label = structure("readxl()", html = TRUE, class = c("html", + "character")), answers = list(structure(list(id = "lnr_ans_77cc981", + option = "readxl", value = "readxl", label = structure("readxl", 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_8dbe603", - option = "readxls()", value = "readxls()", label = structure("readxls()", html = TRUE, class = c("html", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_49222fc", + option = "readxls", value = "readxls", label = structure("readxls", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", - "tutorial_quiz_answer")), structure(list(id = "lnr_ans_9ef64b6", - option = "readexcel()", value = "readexcel()", label = structure("readexcel()", html = TRUE, class = c("html", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_a85e697", + option = "readexcel", value = "readexcel", label = structure("readexcel", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", - "tutorial_quiz_answer")), structure(list(id = "lnr_ans_4b0467d", - option = "excelread()", value = "excelread()", label = structure("excelread()", html = TRUE, class = c("html", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_c307c01", + option = "excelread", value = "excelread", label = structure("excelread", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", "tutorial_quiz_answer"))), button_labels = list(submit = structure("<span data-i18n=\"button.questionsubmit\">Submit Answer<\u002fspan>", html = TRUE, class = c("html", "character")), try_again = structure("<span data-i18n=\"button.questiontryagain\">Try Again<\u002fspan>", html = TRUE, class = c("html", @@ -1329,7 +1329,7 @@ learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label "character")), message = NULL, post_message = NULL), ids = list( answer = "second-quiz-3-answer", question = "second-quiz-3"), loading = NULL, random_answer_order = FALSE, allow_retry = FALSE, - seed = 1584494806.76216, options = list()), class = c("learnr_radio", + seed = 47954556.9776694, options = list()), class = c("learnr_radio", "tutorial_question")), session = session) </script> @@ -1337,19 +1337,19 @@ learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label <script type="application/shiny-prerendered" data-context="server"> learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label = "second-quiz-4", question = structure("Wie lassen sich einzelne Spalten aus dem Datensatz auslesen?", html = TRUE, class = c("html", - "character")), answers = list(structure(list(id = "lnr_ans_f8cea2c", + "character")), answers = list(structure(list(id = "lnr_ans_e17a097", option = "dataset&\\`column\\`", value = "dataset&\\`column\\`", label = structure("dataset&`column`", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", - "tutorial_quiz_answer")), structure(list(id = "lnr_ans_3a6af4", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_d8c02b4", option = "column$dataset", value = "column$dataset", label = structure("column$dataset", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", - "tutorial_quiz_answer")), structure(list(id = "lnr_ans_591867b", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_16a721", option = "dataset%\\`column\\`", value = "dataset%\\`column\\`", label = structure("dataset%`column`", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", - "tutorial_quiz_answer")), structure(list(id = "lnr_ans_7ef7125", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_947ba29", option = "dataset$\\`column\\`", value = "dataset$\\`column\\`", label = structure("dataset$`column`", html = TRUE, class = c("html", "character")), correct = TRUE, message = NULL, type = "literal"), class = c("tutorial_question_answer", @@ -1361,7 +1361,7 @@ learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label "character")), message = NULL, post_message = NULL), ids = list( answer = "second-quiz-4-answer", question = "second-quiz-4"), loading = NULL, random_answer_order = FALSE, allow_retry = FALSE, - seed = 1958914011.58781, options = list()), class = c("learnr_radio", + seed = 916389851.073273, options = list()), class = c("learnr_radio", "tutorial_question")), session = session) </script> @@ -1657,10 +1657,10 @@ learnr:::store_exercise_cache(structure(list(label = "hypothesis-test", global_s <script type="application/shiny-prerendered" data-context="server"> learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label = "hypothesis-quiz-1", question = structure("Die durchschnittliche Spielzeit betraegt 30 minuten.", html = TRUE, class = c("html", - "character")), answers = list(structure(list(id = "lnr_ans_309140c", + "character")), answers = list(structure(list(id = "lnr_ans_fec79b5", option = "Wahr", value = "Wahr", label = structure("Wahr", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", - "tutorial_quiz_answer")), structure(list(id = "lnr_ans_d9b4c34", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_b354b57", option = "Falsch", value = "Falsch", label = structure("Falsch", html = TRUE, class = c("html", "character")), correct = TRUE, message = NULL, type = "literal"), class = c("tutorial_question_answer", "tutorial_quiz_answer"))), button_labels = list(submit = structure("<span data-i18n=\"button.questionsubmit\">Submit Answer<\u002fspan>", html = TRUE, class = c("html", @@ -1671,7 +1671,7 @@ learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label "character")), message = NULL, post_message = NULL), ids = list( answer = "hypothesis-quiz-1-answer", question = "hypothesis-quiz-1"), loading = NULL, random_answer_order = FALSE, allow_retry = FALSE, - seed = 816997023.119556, options = list()), class = c("learnr_radio", + seed = 1005733092.03167, options = list()), class = c("learnr_radio", "tutorial_question")), session = session) </script> @@ -1679,10 +1679,10 @@ learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label <script type="application/shiny-prerendered" data-context="server"> learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label = "hypothesis-quiz-2", question = structure("Pro Spiel haben 15000 leute eine Bewertung gegeben.", html = TRUE, class = c("html", - "character")), answers = list(structure(list(id = "lnr_ans_a7cb675", + "character")), answers = list(structure(list(id = "lnr_ans_6104238", option = "Wahr", value = "Wahr", label = structure("Wahr", 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_a06bb58", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_66497e6", option = "Falsch", value = "Falsch", label = structure("Falsch", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", "tutorial_quiz_answer"))), button_labels = list(submit = structure("<span data-i18n=\"button.questionsubmit\">Submit Answer<\u002fspan>", html = TRUE, class = c("html", @@ -1693,7 +1693,7 @@ learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label "character")), message = NULL, post_message = NULL), ids = list( answer = "hypothesis-quiz-2-answer", question = "hypothesis-quiz-2"), loading = NULL, random_answer_order = FALSE, allow_retry = FALSE, - seed = 1692421468.2119, options = list()), class = c("learnr_radio", + seed = 940237468.562168, options = list()), class = c("learnr_radio", "tutorial_question")), session = session) </script> @@ -1739,20 +1739,20 @@ learnr:::store_exercise_cache(structure(list(label = "plotExercise", global_setu <script type="application/shiny-prerendered" data-context="server"> learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label = "quiz-ggplot-1", question = structure("Was ist der Median im Diagramm?", html = TRUE, class = c("html", - "character")), answers = list(structure(list(id = "lnr_ans_dad23d4", + "character")), answers = list(structure(list(id = "lnr_ans_f0ae3b5", option = "ein vertikaler Strich", value = "ein vertikaler Strich", label = structure("ein vertikaler Strich", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", - "tutorial_quiz_answer")), structure(list(id = "lnr_ans_d6f7064", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_3e40d11", option = "die Höhe der Box", value = "die Höhe der Box", label = structure("die Höhe der Box", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", - "tutorial_quiz_answer")), structure(list(id = "lnr_ans_63e317a", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_487767a", option = "ein horizontaler Strich in der Mitter der Box", value = "ein horizontaler Strich in der Mitter der Box", label = structure("ein horizontaler Strich in der Mitter der Box", 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_ba7cac4", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_eeb9b5b", option = "das untere Ende der Box", value = "das untere Ende der Box", label = structure("das untere Ende der Box", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", @@ -1764,7 +1764,7 @@ learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label "character")), message = NULL, post_message = NULL), ids = list( answer = "quiz-ggplot-1-answer", question = "quiz-ggplot-1"), loading = NULL, random_answer_order = FALSE, allow_retry = FALSE, - seed = 745289841.152947, options = list()), class = c("learnr_radio", + seed = 1042249308.01466, options = list()), class = c("learnr_radio", "tutorial_question")), session = session) </script> @@ -1772,19 +1772,19 @@ learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label <script type="application/shiny-prerendered" data-context="server"> learnr:::question_prerendered_chunk(structure(list(type = "learnr_checkbox", label = "quiz-ggplot-2", question = structure("Was sind die Quartile im Diagramm?(Es sind mehrere Antworten möglich)", html = TRUE, class = c("html", - "character")), answers = list(structure(list(id = "lnr_ans_99031a4", + "character")), answers = list(structure(list(id = "lnr_ans_ba92feb", option = "das obere Ende der Box", value = "das obere Ende der Box", label = structure("das obere Ende der Box", 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_19ee2bc", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_19e915f", option = "Punkte oberhalb der Box", value = "Punkte oberhalb der Box", label = structure("Punkte oberhalb der Box", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", - "tutorial_quiz_answer")), structure(list(id = "lnr_ans_f68a023", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_cd49ba", option = "ein Drittel des vertikalen Strichs", value = "ein Drittel des vertikalen Strichs", label = structure("ein Drittel des vertikalen Strichs", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", - "tutorial_quiz_answer")), structure(list(id = "lnr_ans_9985149", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_a8d3c2d", option = "das untere Ende der Box", value = "das untere Ende der Box", label = structure("das untere Ende der Box", html = TRUE, class = c("html", "character")), correct = TRUE, message = NULL, type = "literal"), class = c("tutorial_question_answer", @@ -1796,26 +1796,26 @@ learnr:::question_prerendered_chunk(structure(list(type = "learnr_checkbox", lab "character")), message = NULL, post_message = NULL), ids = list( answer = "quiz-ggplot-2-answer", question = "quiz-ggplot-2"), loading = NULL, random_answer_order = FALSE, allow_retry = FALSE, - seed = 1481699904.31003, options = list()), class = c("learnr_checkbox", + seed = 1889908939.61994, options = list()), class = c("learnr_checkbox", "tutorial_question")), session = session) </script> <script type="application/shiny-prerendered" data-context="server"> learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label = "quiz-ggplot-3", question = structure("Was sind die Maximalwerte im Diagramm?", html = TRUE, class = c("html", - "character")), answers = list(structure(list(id = "lnr_ans_4ad8e00", + "character")), answers = list(structure(list(id = "lnr_ans_3604703", option = "Punkte oberhalb der Box", value = "Punkte oberhalb der Box", label = structure("Punkte oberhalb der Box", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", - "tutorial_quiz_answer")), structure(list(id = "lnr_ans_66e7657", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_cb6b0d2", option = "die Spitzen des vertikalen Strichs", value = "die Spitzen des vertikalen Strichs", label = structure("die Spitzen des vertikalen Strichs", 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_5800bcc", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_6d9fde7", option = "die x-Achse und die y-Achse", value = "die x-Achse und die y-Achse", label = structure("die x-Achse und die y-Achse", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", - "tutorial_quiz_answer")), structure(list(id = "lnr_ans_6fc92f7", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_9a1dd0b", option = "die Flaeche der Box", value = "die Flaeche der Box", label = structure("die Flaeche der Box", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", @@ -1827,7 +1827,7 @@ learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label "character")), message = NULL, post_message = NULL), ids = list( answer = "quiz-ggplot-3-answer", question = "quiz-ggplot-3"), loading = NULL, random_answer_order = FALSE, allow_retry = FALSE, - seed = 1184804724.94828, options = list()), class = c("learnr_radio", + seed = 196270943.908604, options = list()), class = c("learnr_radio", "tutorial_question")), session = session) </script> @@ -1835,15 +1835,15 @@ learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label <script type="application/shiny-prerendered" data-context="server"> learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label = "quiz-ggplot-4", question = structure("An was erkennt man im Diagramm die Ausreißer?", html = TRUE, class = c("html", - "character")), answers = list(structure(list(id = "lnr_ans_bbfbcd6", + "character")), answers = list(structure(list(id = "lnr_ans_feb2686", option = "es sind Punkte außerhalb der Box", value = "es sind Punkte außerhalb der Box", label = structure("es sind Punkte außerhalb der Box", 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_85fd415", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_5c217bb", option = "an der Größe der Box", value = "an der Größe der Box", label = structure("an der Größe der Box", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", - "tutorial_quiz_answer")), structure(list(id = "lnr_ans_7fe2d7e", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_72dbbc6", option = "durch schlechtes Verhalten", value = "durch schlechtes Verhalten", label = structure("durch schlechtes Verhalten", html = TRUE, class = c("html", "character")), correct = FALSE, message = NULL, type = "literal"), class = c("tutorial_question_answer", @@ -1855,7 +1855,7 @@ learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label "character")), message = NULL, post_message = NULL), ids = list( answer = "quiz-ggplot-4-answer", question = "quiz-ggplot-4"), loading = NULL, random_answer_order = FALSE, allow_retry = FALSE, - seed = 1966414467.58432, options = list()), class = c("learnr_radio", + seed = 1166282006.45691, options = list()), class = c("learnr_radio", "tutorial_question")), session = session) </script>