diff --git a/tutorial_page.Rmd b/tutorial_page.Rmd
index 894284fe565d8c73fade72559b6bca1f3cd9a461..6c91137de24d79380c48b22a75d08dd7d47989be 100644
--- a/tutorial_page.Rmd
+++ b/tutorial_page.Rmd
@@ -295,7 +295,7 @@ owned <- gameData$"Owned Users"
 
 Falls man etwas mehr information will, kann man die Eingabe (oder die Variale in welche man dies gespeichert hat) noch in die ```summary()``` Funktion schreiben.\
 Weiterhin kann man dies auf ein Plot abbilden. Dazu verwendet man die ```plot()``` Funktion in welche man einen x und y Wert eingibt, zusammen mit Optionen wie das Plot aussehen soll. Mehr information dazu findet man [in der Dokumentation](https://www.rdocumentation.org/packages/graphics/versions/3.6.2/topics/plot).\
-Mit ```abline()``` kann man die Regressionslinie der lm Funktion abbilden. Dazu wird die lm Funktion, oder die Variable in der diese gespeichert ist, an ```abline()``` uebergeben.
+Mit ```abline()``` kann man die Regressionslinie der lm Funktion abbilden. Dazu wird die lm Funktion, oder die Variable in der diese gespeichert ist, an ```abline()``` uebergeben.\
 ```{r lm-plot-example}
 raters <- gameData$"Users Rated"
 owned <- gameData$"Owned Users"
@@ -318,23 +318,22 @@ plot(, , pch = 16, col = "blue")
 
 ### Hypothesentest
 
-R hat Funktionen zum Testen von Hypothesen. Bei den bereits gegebenen Hypothesen eignet sich der [Chi-squared test](https://www.rdocumentation.org/packages/stats/versions/3.6.2/topics/chisq.test). Dieser wird mit ```chisq.test()``` aufgerufen und nimmt zwei Wertesets an mit weiteren Parametern fuer genaueres einstellen. 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.
+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 hypothesis-test, exercise=TRUE, exercise.lines=4}
-cavg <- gameData$"Complexity Average"
-owned <- gameData$"Owned Users"
 ptime <- gameData$"Play Time"
+rated <- gameData$"Users Rated"
 ```
 
 ```{r hypothesis-quiz}
 quiz(
-  question("Spiele mit hoeherem Complexity Average haben eine niedrigere Anzahl von Owned Users.",
-    answer("Wahr", correct = TRUE),
-    answer("Falsch")
-  ),
-  question("Spiele mit hoeherem Complexity Average haben hoehere Play Time.",
+  question("Die durchschnittliche Spielzeit betraegt 30 minuten.",
     answer("Wahr"),
     answer("Falsch", correct = TRUE)
+  ),
+  question("Pro Spiel haben 15000 leute eine Bewertung gegeben.",
+    answer("Wahr", correct = TRUE),
+    answer("Falsch")
   )
 )
 ```
diff --git a/tutorial_page.html b/tutorial_page.html
index 842eb31b724930cb930a905010f54248c78eae05..4161d7860ad1745207964ac548b1d3ca123bbb3b 100644
--- a/tutorial_page.html
+++ b/tutorial_page.html
@@ -517,7 +517,7 @@ href="https://www.rdocumentation.org/packages/graphics/versions/3.6.2/topics/plo
 der Dokumentation</a>.<br />
 Mit <code>abline()</code> kann man die Regressionslinie der lm Funktion
 abbilden. Dazu wird die lm Funktion, oder die Variable in der diese
-gespeichert ist, an <code>abline()</code> uebergeben.
+gespeichert ist, an <code>abline()</code> uebergeben.<br />
 <img src="tutorial_page_files/figure-html/lm-plot-example-1.png" width="624" /></p>
 Versuchen Sie nun den oben gezeigten Plot selbst zu erstellen. Die Farbe
 und Parameter sind bereits vorgegeben.
@@ -536,20 +536,19 @@ plot(, , pch = 16, col = &quot;blue&quot;)</code></pre>
 </div>
 <div id="section-hypothesentest" class="section level3">
 <h3>Hypothesentest</h3>
-<p>R hat Funktionen zum Testen von Hypothesen. Bei den bereits gegebenen
-Hypothesen eignet sich der <a
-href="https://www.rdocumentation.org/packages/stats/versions/3.6.2/topics/chisq.test">Chi-squared
-test</a>. Dieser wird mit <code>chisq.test()</code> aufgerufen und nimmt
-zwei Wertesets an mit weiteren Parametern fuer genaueres einstellen. 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.</p>
+<p>R hat Funktionen zum Testen von Hypothesen. Hier kann man nun den <a
+href="https://www.rdocumentation.org/packages/stats/versions/3.6.2/topics/t.test">T-Test</a>
+anwenden. In der Funktion <code>t.test()</code> 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
+<code>mu={value}</code> angeben.</p>
 <div class="tutorial-exercise" data-label="hypothesis-test"
 data-completion="1" data-diagnostics="1" data-startover="1"
 data-lines="4" data-pipe="|&gt;">
-<pre class="text"><code>cavg &lt;- gameData$&quot;Complexity Average&quot;
-owned &lt;- gameData$&quot;Owned Users&quot;
-ptime &lt;- gameData$&quot;Play Time&quot;</code></pre>
+<pre class="text"><code>ptime &lt;- gameData$&quot;Play Time&quot;
+rated &lt;- gameData$&quot;Users Rated&quot;</code></pre>
 <script type="application/json" data-ui-opts="1">{"engine":"r","has_checker":false,"caption":"<span data-i18n=\"text.enginecap\" data-i18n-opts=\"{&quot;engine&quot;:&quot;R&quot;}\">R Code<\/span>"}</script>
 </div>
 <div class="panel-heading tutorial-quiz-title"><span data-i18n="text.quiz">Quiz</span></div>
@@ -1244,19 +1243,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_12cf4cb", 
+    "character")), answers = list(structure(list(id = "lnr_ans_be1d985", 
         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_65b9fe3", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_e89a2ef", 
         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_90226f5", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_e696377", 
         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_97a58eb", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_bdf59b7", 
         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", 
@@ -1267,7 +1266,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 = 1218072898.93279, options = list()), class = c("learnr_radio", 
+    seed = 601899230.719719, options = list()), class = c("learnr_radio", 
 "tutorial_question")), session = session)
 </script>
 
@@ -1275,16 +1274,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_16687fb", 
+    "character")), answers = list(structure(list(id = "lnr_ans_e84571d", 
         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_7a27b3a", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_2781b16", 
         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_3ad5217", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_84efd9b", 
         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_683f85c", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_e2e3021", 
         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", 
@@ -1296,23 +1295,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 = 1599605720.25513, options = list()), class = c("learnr_radio", 
+    seed = 460423745.285598, 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_f45d7ab", 
+    "character")), answers = list(structure(list(id = "lnr_ans_10e2d44", 
         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_65934f8", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_630dc3d", 
         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_33189f9", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_30358b7", 
         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_ac98401", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_3a0342f", 
         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", 
@@ -1323,7 +1322,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 = 163007436.924094, options = list()), class = c("learnr_radio", 
+    seed = 1284267179.90197, options = list()), class = c("learnr_radio", 
 "tutorial_question")), session = session)
 </script>
 
@@ -1331,19 +1330,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_96832df", 
+    "character")), answers = list(structure(list(id = "lnr_ans_f675a70", 
         option = "dataset&\\`column\\`", value = "dataset&\\`column\\`", 
         label = structure("dataset&amp;`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_c6758aa", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_d93701d", 
         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_5ee110b", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_e0dd963", 
         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_c3ffeb", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_267e7db", 
         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", 
@@ -1355,7 +1354,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 = 826987455.114904, options = list()), class = c("learnr_radio", 
+    seed = 678218021.18418, options = list()), class = c("learnr_radio", 
 "tutorial_question")), session = session)
 </script>
  
@@ -1619,7 +1618,7 @@ learnr:::store_exercise_cache(structure(list(label = "hypothesis-test", global_s
 "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 = "hypothesis-test", 
-    code = "cavg <- gameData$\"Complexity Average\"\nowned <- gameData$\"Owned Users\"\nptime <- gameData$\"Play Time\"", 
+    code = "ptime <- gameData$\"Play Time\"\nrated <- gameData$\"Users Rated\"", 
     opts = list(label = "\"hypothesis-test\"", exercise = "TRUE", 
         exercise.lines = "4"), engine = "r")), code_check = NULL, 
     error_check = NULL, check = NULL, solution = NULL, tests = NULL, 
@@ -1640,9 +1639,9 @@ learnr:::store_exercise_cache(structure(list(label = "hypothesis-test", global_s
         message = TRUE, render = NULL, ref.label = NULL, child = NULL, 
         engine = "r", split = FALSE, include = TRUE, purl = TRUE, 
         max.print = 1000, label = "hypothesis-test", exercise = TRUE, 
-        exercise.lines = 4, code = c("cavg <- gameData$\"Complexity Average\"", 
-        "owned <- gameData$\"Owned Users\"", "ptime <- gameData$\"Play Time\""
-        ), out.width.px = 624, out.height.px = 384, params.src = "hypothesis-test, exercise=TRUE, exercise.lines=4", 
+        exercise.lines = 4, code = c("ptime <- gameData$\"Play Time\"", 
+        "rated <- gameData$\"Users Rated\""), out.width.px = 624, 
+        out.height.px = 384, params.src = "hypothesis-test, exercise=TRUE, exercise.lines=4", 
         fig.num = 0, exercise.df_print = "paged", exercise.checker = "NULL"), 
     engine = "r", version = "4"), class = c("r", "tutorial_exercise"
 )))
@@ -1650,13 +1649,13 @@ 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("Spiele mit hoeherem Complexity Average haben eine niedrigere Anzahl von Owned Users.", html = TRUE, class = c("html", 
-    "character")), answers = list(structure(list(id = "lnr_ans_9bb2259", 
+    question = structure("Die durchschnittliche Spielzeit betraegt 30 minuten.", html = TRUE, class = c("html", 
+    "character")), answers = list(structure(list(id = "lnr_ans_9bb17a5", 
         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_e13f1f", 
-        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")), structure(list(id = "lnr_ans_1f3a562", 
+        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", 
     "character")), try_again = structure("<span data-i18n=\"button.questiontryagain\">Try Again<\u002fspan>", html = TRUE, class = c("html", 
     "character"))), messages = list(correct = structure("Correct!", html = TRUE, class = c("html", 
@@ -1665,20 +1664,20 @@ 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 = 1536608112.28446, options = list()), class = c("learnr_radio", 
+    seed = 1544183715.28093, 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 = "hypothesis-quiz-2", 
-    question = structure("Spiele mit hoeherem Complexity Average haben hoehere Play Time.", html = TRUE, class = c("html", 
-    "character")), answers = list(structure(list(id = "lnr_ans_cf287ea", 
+    question = structure("Pro Spiel haben 15000 leute eine Bewertung gegeben.", html = TRUE, class = c("html", 
+    "character")), answers = list(structure(list(id = "lnr_ans_495a2cf", 
         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_73903cd", 
-        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")), structure(list(id = "lnr_ans_731cf7b", 
+        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", 
     "character")), try_again = structure("<span data-i18n=\"button.questiontryagain\">Try Again<\u002fspan>", html = TRUE, class = c("html", 
     "character"))), messages = list(correct = structure("Correct!", html = TRUE, class = c("html", 
@@ -1687,7 +1686,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 = 1942667023.09538, options = list()), class = c("learnr_radio", 
+    seed = 2019060634.0598, options = list()), class = c("learnr_radio", 
 "tutorial_question")), session = session)
 </script>
  
@@ -1733,20 +1732,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_8e6a4e1", 
+    "character")), answers = list(structure(list(id = "lnr_ans_7e8eeec", 
         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_de7bf86", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_1cc8cbd", 
         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_9cbbb0", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_a0d5cc6", 
         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_de60dda", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_e368d73", 
         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", 
@@ -1758,7 +1757,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 = 1905845529.61252, options = list()), class = c("learnr_radio", 
+    seed = 1433709425.83238, options = list()), class = c("learnr_radio", 
 "tutorial_question")), session = session)
 </script>
 
@@ -1766,19 +1765,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_2d02475", 
+    "character")), answers = list(structure(list(id = "lnr_ans_2854118", 
         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_f1ec212", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_c6611ef", 
         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_c2c2414", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_8e1fc07", 
         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_97277dc", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_3dedaa3", 
         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", 
@@ -1790,26 +1789,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 = 1246543396.91953, options = list()), class = c("learnr_checkbox", 
+    seed = 211417526.901551, 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_30b8dd6", 
+    "character")), answers = list(structure(list(id = "lnr_ans_ebe3230", 
         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_aeaac7b", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_a62487", 
         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_73781c9", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_c378148", 
         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_bacc9de", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_3d8920e", 
         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", 
@@ -1821,7 +1820,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 = 397739784.814788, options = list()), class = c("learnr_radio", 
+    seed = 1430753873.33375, options = list()), class = c("learnr_radio", 
 "tutorial_question")), session = session)
 </script>
 
@@ -1829,15 +1828,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_64c8763", 
+    "character")), answers = list(structure(list(id = "lnr_ans_40465c9", 
         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_791bcb0", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_678c963", 
         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_2a2548c", 
+    "tutorial_quiz_answer")), structure(list(id = "lnr_ans_3c1c65d", 
         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", 
@@ -1849,7 +1848,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 = 171218747.92027, options = list()), class = c("learnr_radio", 
+    seed = 319161909.851379, options = list()), class = c("learnr_radio", 
 "tutorial_question")), session = session)
 </script>