diff --git a/tutorial_page.Rmd b/tutorial_page.Rmd index f3130a0d4c1fb05d9d62bd19a05f909afe03f71e..5d49752d6d7106192cc837f96516b88ecad0f5bd 100644 --- a/tutorial_page.Rmd +++ b/tutorial_page.Rmd @@ -138,16 +138,16 @@ gameData$`Mechanics` <- tolower(gameData$`Mechanics`) gameData$`Mechanics` ``` -Somit wurden alle String in der "Mechanics"-Spalte zur Lowercase gecastet. +Somit wurden alle Zeichenketten in der Spalte "Mechanics" in Kleinbuchstaben umgewandelt. #### Ersetzen von Werten: ```{r replace-variable, exercise=TRUE} -gameData$`Mechanics` <- gsub("Action", "ACTION", gameData$`Mechanics`) +gameData$`Mechanics` <- gsub("Action", "!!!ACTION!!!", gameData$`Mechanics`) gameData$`Mechanics` ``` -Somit haben wir alle treffer für "Action" mit "ACTION" ersetzt. +Somit haben wir alle treffer für "Action" mit "!!!ACTION!!!" ersetzt. #### Behandlung von fehlenden Werten: @@ -170,8 +170,6 @@ vector <- unique(vector) vector ``` -So werden die Duplikate aus dem Datensatz entfernt. - #### Behandlung von Sonderzeichen ```{r replace-special-chars, exercise=TRUE} diff --git a/tutorial_page.html b/tutorial_page.html index 620de10660afaaede800a778493d50db8c950ceb..c17fdd5a2aae07023ffce878f522a557f0084aac 100644 --- a/tutorial_page.html +++ b/tutorial_page.html @@ -292,19 +292,20 @@ data-lines="0" data-pipe="|>"> gameData$`Mechanics`</code></pre> <script type="application/json" data-ui-opts="1">{"engine":"r","has_checker":false,"caption":"<span data-i18n=\"text.enginecap\" data-i18n-opts=\"{"engine":"R"}\">R Code<\/span>"}</script> </div> -<p>Somit wurden alle String in der “Mechanicsâ€-Spalte zur Lowercase -gecastet.</p> +<p>Somit wurden alle Zeichenketten in der Spalte “Mechanics†in +Kleinbuchstaben umgewandelt.</p> </div> <div id="section-ersetzen-von-werten" class="section level4"> <h4>Ersetzen von Werten:</h4> <div class="tutorial-exercise" data-label="replace-variable" data-completion="1" data-diagnostics="1" data-startover="1" data-lines="0" data-pipe="|>"> -<pre class="text"><code>gameData$`Mechanics` <- gsub("Action", "ACTION", gameData$`Mechanics`) +<pre class="text"><code>gameData$`Mechanics` <- gsub("Action", "!!!ACTION!!!", gameData$`Mechanics`) gameData$`Mechanics`</code></pre> <script type="application/json" data-ui-opts="1">{"engine":"r","has_checker":false,"caption":"<span data-i18n=\"text.enginecap\" data-i18n-opts=\"{"engine":"R"}\">R Code<\/span>"}</script> </div> -<p>Somit haben wir alle treffer für “Action†mit “ACTION†ersetzt.</p> +<p>Somit haben wir alle treffer für “Action†mit “!!!ACTION!!!†+ersetzt.</p> </div> <div id="section-behandlung-von-fehlenden-werten" class="section level4"> @@ -333,7 +334,6 @@ vector <- unique(vector) vector</code></pre> <script type="application/json" data-ui-opts="1">{"engine":"r","has_checker":false,"caption":"<span data-i18n=\"text.enginecap\" data-i18n-opts=\"{"engine":"R"}\">R Code<\/span>"}</script> </div> -<p>So werden die Duplikate aus dem Datensatz entfernt.</p> </div> <div id="section-behandlung-von-sonderzeichen" class="section level4"> <h4>Behandlung von Sonderzeichen</h4> @@ -1072,7 +1072,7 @@ learnr:::store_exercise_cache(structure(list(label = "replace-variable", global_ "gameData <- read_excel(\"bgg_dataset.xlsx\", sheet = \"Sheet\")", "knitr::opts_chunk$set(echo = FALSE)"), chunk_opts = list(label = "setup", include = FALSE)), setup = NULL, chunks = list(list(label = "replace-variable", - code = "gameData$`Mechanics` <- gsub(\"Action\", \"ACTION\", gameData$`Mechanics`)\ngameData$`Mechanics`", + code = "gameData$`Mechanics` <- gsub(\"Action\", \"!!!ACTION!!!\", gameData$`Mechanics`)\ngameData$`Mechanics`", opts = list(label = "\"replace-variable\"", exercise = "TRUE"), engine = "r")), code_check = NULL, error_check = NULL, check = NULL, solution = NULL, tests = NULL, options = list(eval = FALSE, @@ -1092,7 +1092,7 @@ learnr:::store_exercise_cache(structure(list(label = "replace-variable", global_ message = TRUE, render = NULL, ref.label = NULL, child = NULL, engine = "r", split = FALSE, include = TRUE, purl = TRUE, max.print = 1000, label = "replace-variable", exercise = TRUE, - code = c("gameData$`Mechanics` <- gsub(\"Action\", \"ACTION\", gameData$`Mechanics`)", + code = c("gameData$`Mechanics` <- gsub(\"Action\", \"!!!ACTION!!!\", gameData$`Mechanics`)", "gameData$`Mechanics`"), out.width.px = 624, out.height.px = 384, params.src = "replace-variable, exercise=TRUE", fig.num = 0, exercise.df_print = "paged", exercise.checker = "NULL"), @@ -1228,19 +1228,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_7e64aa", + "character")), answers = list(structure(list(id = "lnr_ans_1566a39", 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_4640907", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_b0edff0", 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_6916962", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_f80465b", 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_602ca8e", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_71aef76", 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", @@ -1251,7 +1251,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 = 1982843609.07667, options = list()), class = c("learnr_radio", + seed = 637017036.703366, options = list()), class = c("learnr_radio", "tutorial_question")), session = session) </script> @@ -1259,16 +1259,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_158bafc", + "character")), answers = list(structure(list(id = "lnr_ans_a2e794d", 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_9a4ec6", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_f9169d7", 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_3e7ef13", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_9815071", 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_8fef38e", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_ad51d4f", 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", @@ -1280,23 +1280,23 @@ 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 = 1340973042.37556, options = list()), class = c("learnr_radio", + seed = 1625983262.74284, 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_fcf329d", + "character")), answers = list(structure(list(id = "lnr_ans_2f69ac3", 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_a9d97de", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_d998b62", 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_efd8c13", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_7be87fc", 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_d013447", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_20aac7b", 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", @@ -1307,7 +1307,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 = 155889831.927408, options = list()), class = c("learnr_radio", + seed = 349725907.337146, options = list()), class = c("learnr_radio", "tutorial_question")), session = session) </script> @@ -1315,19 +1315,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_33eeebb", + "character")), answers = list(structure(list(id = "lnr_ans_db23f06", 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_332fe06", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_eaab6e7", 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_a7646ad", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_7d67ee2", 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_f3bce47", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_ff7fd30", 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", @@ -1339,7 +1339,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 = 974396909.546261, options = list()), class = c("learnr_radio", + seed = 1398777110.34864, options = list()), class = c("learnr_radio", "tutorial_question")), session = session) </script> @@ -1591,10 +1591,10 @@ learnr:::store_exercise_cache(structure(list(label = "lm-plot", global_setup = s <script type="application/shiny-prerendered" data-context="server"> learnr:::question_prerendered_chunk(structure(list(type = "learnr_radio", label = "hypothesis-quiz-1", question = structure("Spiele mit hoeherem Complexity Score haben eine niedrigere Anzahl von Owned Users.", html = TRUE, class = c("html", - "character")), answers = list(structure(list(id = "lnr_ans_2c74e46", + "character")), answers = list(structure(list(id = "lnr_ans_68ccd7b", 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_5e4751c", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_1e6296f", 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", @@ -1605,7 +1605,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 = 461792430.284961, options = list()), class = c("learnr_radio", + seed = 1515152110.79445, options = list()), class = c("learnr_radio", "tutorial_question")), session = session) </script> @@ -1613,10 +1613,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("Spiele mit hoeherem Complexity Score haben hoehere Play Time.", html = TRUE, class = c("html", - "character")), answers = list(structure(list(id = "lnr_ans_7371086", + "character")), answers = list(structure(list(id = "lnr_ans_3846206", 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_205cd45", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_a8c77d4", 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", @@ -1627,7 +1627,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 = 780167729.636706, options = list()), class = c("learnr_radio", + seed = 750405261.150565, options = list()), class = c("learnr_radio", "tutorial_question")), session = session) </script> @@ -1673,20 +1673,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_8f585f1", + "character")), answers = list(structure(list(id = "lnr_ans_878aef5", 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_40aece4", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_772611e", 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_b8158f0", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_4d30e87", 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_79b80f4", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_158e05b", 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", @@ -1698,7 +1698,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 = 2140697264.00316, options = list()), class = c("learnr_radio", + seed = 1818856474.65303, options = list()), class = c("learnr_radio", "tutorial_question")), session = session) </script> @@ -1706,19 +1706,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_788202e", + "character")), answers = list(structure(list(id = "lnr_ans_279be13", 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_5f5f654", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_887870f", 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_9f7151f", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_3022269", 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_d923cc7", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_874cf80", 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", @@ -1730,26 +1730,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 = 961543748.052246, options = list()), class = c("learnr_checkbox", + seed = 1157877186.46082, 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_a617089", + "character")), answers = list(structure(list(id = "lnr_ans_c3d68ea", 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_bdd146e", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_34a52bd", 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_9093b6a", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_81dc897", 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_9d9c26c", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_fe3a57f", 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", @@ -1761,7 +1761,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 = 842340500.607755, options = list()), class = c("learnr_radio", + seed = 763240019.144589, options = list()), class = c("learnr_radio", "tutorial_question")), session = session) </script> @@ -1769,15 +1769,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_f6a0d3b", + "character")), answers = list(structure(list(id = "lnr_ans_ad6f2aa", 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_9258649", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_f0a0c56", 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_7e89b93", + "tutorial_quiz_answer")), structure(list(id = "lnr_ans_b4b7bc9", 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", @@ -1789,7 +1789,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 = 947573703.558752, options = list()), class = c("learnr_radio", + seed = 1148582026.96515, options = list()), class = c("learnr_radio", "tutorial_question")), session = session) </script>