diff --git a/.nojekyll b/.nojekyll
index d934bd2..d47fb70 100644
--- a/.nojekyll
+++ b/.nojekyll
@@ -1 +1 @@
-ca9edca4
\ No newline at end of file
+be29ebca
\ No newline at end of file
diff --git a/materials.html b/materials.html
index e35a972..86a2179 100644
--- a/materials.html
+++ b/materials.html
@@ -235,7 +235,7 @@
 };
 
 // Store cell data
-globalThis.qwebrCellDetails = [{"code":"data(crampton.pig, package = \"agridat\")\nstr(crampton.pig)","id":1,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-1","read-only":"false","results":"markup","fig-cap":"","autorun":"true","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"ggplot(crampton.pig, aes(___)) + \n  geom_density() ","id":2,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-2","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"ggplot(crampton.pig, aes(___)) + \n  geom____() ","id":3,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-3","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"ggplot(crampton.pig, aes(___, ___, color = ___, size = ___)) + \n  geom____()","id":4,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-4","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"ggplot(crampton.pig, aes(___, ___, fill = ___)) + \n  geom_tile(color = \"black\", linewidth = 2)","id":5,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-5","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"pigdata <- crampton.pig |> \n  # make id for each pig\n  mutate(pig = 1:n()) |> \n  rename(initial = weight1,\n           final = weight2) |> \n  # reshape data\n  ___ |> \n  # change the order of the levels\n  mutate(period = factor(period, levels = c(\"initial\", \"final\"))\n\nggplot(pigdata, aes(___, ___, group = pig, color = ___)) +\n  geom_line()","id":6,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-6","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"str(diamonds)","id":7,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-7","read-only":"false","results":"markup","fig-cap":"","autorun":"true","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"ggplot(diamonds, aes(___)) + \n  geom____() ","id":8,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-8","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"ggplot(diamonds, aes(___)) + \n  geom____(___ = 1) ","id":9,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-9","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"ggplot(diamonds, aes(___, ___, fill = ___)) + \n  geom____()","id":10,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-10","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"ggplot(heart2, aes(___, ___)) + \n  geom_density_2d_filled()","id":11,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-11","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"ggplot(diamonds, aes(___, ___)) + \n  geom____()","id":12,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-12","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"data(welch.bermudagrass, package = \"agridat\")\nstr(welch.bermudagrass)","id":13,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-13","read-only":"false","results":"markup","fig-cap":"","autorun":"true","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"ggplot(welch.bermudagrass, aes(___)) + \n  geom____(alpha = 0.2)","id":14,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-14","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"ggplot(welch.bermudagrass, aes(___)) + \n  geom____(alpha = 0.2, \n           aes(___)) ","id":15,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-15","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"ggplot(welch.bermudagrass, aes(___)) + \n  geom____(alpha = 0.2, ___) ","id":16,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-16","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"ggplot(welch.bermudagrass, aes(___)) + \n  geom____(alpha = 0.2, ___) ","id":17,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-17","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"data(scurvy, package = \"medicaldata\")\nstr(scurvy)","id":18,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-18","read-only":"false","results":"markup","fig-cap":"","autorun":"true","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"ggplot(scurvy, aes(___, fill = ___)) + \n  geom____()","id":19,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-19","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"ggplot(scurvy, aes(___, fill = ___)) + \n  geom____(position = position_dodge2(preserve = ___))","id":20,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-20","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"ggplot(scurvy, aes(___, fill = ___)) + \n  geom____(position = ___)","id":21,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-21","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"ggplot(scurvy, aes(___, fill = ___)) + \n  geom____(position = ___) +\n  coord____","id":22,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-22","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"data(nass.wheat, package = \"agridat\")\ndata(nass.corn, package = \"agridat\")\ndata(nass.soybean, package = \"agridat\")\n\nstr(nass.wheat)\nstr(nass.corn)\nstr(nass.soybean)","id":23,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-23","read-only":"false","results":"markup","fig-cap":"","autorun":"true","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"crops_data <- ___\n\nggplot(crops_data, aes(___, ___)) + \n  geom____() + \n  geom____(width = 0.1)","id":24,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-24","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"wheat2011_data <- nass.wheat |> \n  ___(year == 2011) \n\nhighlight <- function(.data) filter(.data, acres > 4000000 | yield > 80)\n\nggplot(wheat2011_data, aes(___, yield)) + \n  ___() + \n  ___(data = ___, color = \"red\") + \n  geom_text(___)","id":25,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-25","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}},{"code":"wheat2011_data_with_map <- nass.wheat |> \n  filter(year == 2011) |> \n  mutate(region = tolower(state)) |>  \n  right_join(map_data(\"state\"), by = \"region\")\n\nggplot(wheat2011_data_with_map, aes(___, ___)) + \n  geom_polygon(aes(___), color = \"black\") +\n  ___(\"label\", x = -120, y = 27, label = \"2011\", size = 8)","id":26,"options":{"message":"true","comment":"","context":"interactive","warning":"true","output":"true","label":"unnamed-chunk-26","read-only":"false","results":"markup","fig-cap":"","autorun":"false","fig-height":5,"classes":"","out-width":"700px","out-height":"","dpi":72,"fig-width":7}}];
+globalThis.qwebrCellDetails = [{"id":1,"code":"data(crampton.pig, package = \"agridat\")\nstr(crampton.pig)","options":{"autorun":"true","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-1","warning":"true","message":"true"}},{"id":2,"code":"ggplot(crampton.pig, aes(___)) + \n  geom_density() ","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-2","warning":"true","message":"true"}},{"id":3,"code":"ggplot(crampton.pig, aes(___)) + \n  geom____() ","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-3","warning":"true","message":"true"}},{"id":4,"code":"ggplot(crampton.pig, aes(___, ___, color = ___, size = ___)) + \n  geom____()","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-4","warning":"true","message":"true"}},{"id":5,"code":"ggplot(crampton.pig, aes(___, ___, fill = ___)) + \n  geom_tile(color = \"black\", linewidth = 2)","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-5","warning":"true","message":"true"}},{"id":6,"code":"pigdata <- crampton.pig |> \n  # make id for each pig\n  mutate(pig = 1:n()) |> \n  rename(initial = weight1,\n           final = weight2) |> \n  # reshape data\n  ___ |> \n  # change the order of the levels\n  mutate(period = factor(period, levels = c(\"initial\", \"final\"))\n\nggplot(pigdata, aes(___, ___, group = pig, color = ___)) +\n  geom_line()","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-6","warning":"true","message":"true"}},{"id":7,"code":"str(diamonds)","options":{"autorun":"true","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-7","warning":"true","message":"true"}},{"id":8,"code":"ggplot(diamonds, aes(___)) + \n  geom____() ","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-8","warning":"true","message":"true"}},{"id":9,"code":"ggplot(diamonds, aes(___)) + \n  geom____(___ = 1) ","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-9","warning":"true","message":"true"}},{"id":10,"code":"ggplot(diamonds, aes(___, ___, fill = ___)) + \n  geom____()","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-10","warning":"true","message":"true"}},{"id":11,"code":"ggplot(heart2, aes(___, ___)) + \n  geom_density_2d_filled()","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-11","warning":"true","message":"true"}},{"id":12,"code":"ggplot(diamonds, aes(___, ___)) + \n  geom____()","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-12","warning":"true","message":"true"}},{"id":13,"code":"data(welch.bermudagrass, package = \"agridat\")\nstr(welch.bermudagrass)","options":{"autorun":"true","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-13","warning":"true","message":"true"}},{"id":14,"code":"ggplot(welch.bermudagrass, aes(___)) + \n  geom____(alpha = 0.2)","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-14","warning":"true","message":"true"}},{"id":15,"code":"ggplot(welch.bermudagrass, aes(___)) + \n  geom____(alpha = 0.2, \n           aes(___)) ","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-15","warning":"true","message":"true"}},{"id":16,"code":"ggplot(welch.bermudagrass, aes(___)) + \n  geom____(alpha = 0.2, ___) ","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-16","warning":"true","message":"true"}},{"id":17,"code":"ggplot(welch.bermudagrass, aes(___)) + \n  geom____(alpha = 0.2, ___) ","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-17","warning":"true","message":"true"}},{"id":18,"code":"data(scurvy, package = \"medicaldata\")\nstr(scurvy)","options":{"autorun":"true","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-18","warning":"true","message":"true"}},{"id":19,"code":"ggplot(scurvy, aes(___, fill = ___)) + \n  geom____()","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-19","warning":"true","message":"true"}},{"id":20,"code":"ggplot(scurvy, aes(___, fill = ___)) + \n  geom____(position = position_dodge2(preserve = ___))","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-20","warning":"true","message":"true"}},{"id":21,"code":"ggplot(scurvy, aes(___, fill = ___)) + \n  geom____(position = ___)","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-21","warning":"true","message":"true"}},{"id":22,"code":"ggplot(scurvy, aes(___, fill = ___)) + \n  geom____(position = ___) +\n  coord____","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-22","warning":"true","message":"true"}},{"id":23,"code":"data(nass.wheat, package = \"agridat\")\ndata(nass.corn, package = \"agridat\")\ndata(nass.soybean, package = \"agridat\")\n\nstr(nass.wheat)\nstr(nass.corn)\nstr(nass.soybean)","options":{"autorun":"true","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-23","warning":"true","message":"true"}},{"id":24,"code":"crops_data <- ___\n\nggplot(crops_data, aes(___, ___)) + \n  geom____() + \n  geom____(width = 0.1)","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-24","warning":"true","message":"true"}},{"id":25,"code":"wheat2011_data <- nass.wheat |> \n  ___(year == 2011) \n\nhighlight <- function(.data) filter(.data, acres > 4000000 | yield > 80)\n\nggplot(wheat2011_data, aes(___, yield)) + \n  ___() + \n  ___(data = ___, color = \"red\") + \n  geom_text(___)","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-25","warning":"true","message":"true"}},{"id":26,"code":"wheat2011_data_with_map <- nass.wheat |> \n  filter(year == 2011) |> \n  mutate(region = tolower(state)) |>  \n  right_join(map_data(\"state\"), by = \"region\")\n\nggplot(wheat2011_data_with_map, aes(___, ___)) + \n  geom_polygon(aes(___), color = \"black\") +\n  ___(\"label\", x = -120, y = 27, label = \"2011\", size = 8)","options":{"autorun":"false","results":"markup","classes":"","output":"true","read-only":"false","fig-height":5,"dpi":72,"out-height":"","fig-cap":"","fig-width":7,"out-width":"700px","context":"interactive","comment":"","label":"unnamed-chunk-26","warning":"true","message":"true"}}];
 
 </script>
 <script type="module">
diff --git a/search.json b/search.json
index 99978eb..d05b91e 100644
--- a/search.json
+++ b/search.json
@@ -284,7 +284,7 @@
     "href": "slides/slide1.html#summary",
     "title": "Drawing plots with ggplot2",
     "section": "Summary",
-    "text": "Summary\n\n\ndata as data.frame\na set of aesthetic mappings between variables in the data and visual properties\nat least one layer (usually geom_ or stat_ functions) which describes what to render\nthe coordinate system (explained next)"
+    "text": "Summary\n\n\ndata as data.frame\na set of aesthetic mappings between variables in the data and visual properties\nat least one layer (usually geom_ or stat_ functions) which describes what to render\nthe coordinate system (explained later)"
   },
   {
     "objectID": "slides/slide1.html#ggplot2-cheatsheet",
diff --git a/sitemap.xml b/sitemap.xml
index 23159a1..6b7450f 100644
--- a/sitemap.xml
+++ b/sitemap.xml
@@ -18,7 +18,7 @@
   </url>
   <url>
     <loc>https://anu-bdsi.github.io/workshop-data-vis-R1/slides/slide1.html</loc>
-    <lastmod>2024-04-08T04:27:10.468Z</lastmod>
+    <lastmod>2024-04-09T23:43:03.398Z</lastmod>
   </url>
   <url>
     <loc>https://anu-bdsi.github.io/workshop-data-vis-R1/index.html</loc>
diff --git a/slides/slide1.html b/slides/slide1.html
index 51750d3..7c34184 100644
--- a/slides/slide1.html
+++ b/slides/slide1.html
@@ -9960,7 +9960,7 @@
   };
 
   // Store cell data
-  globalThis.qwebrCellDetails = [{"options":{"warning":"true","read-only":"false","dpi":72,"fig-height":5,"fig-width":7,"results":"markup","out-height":"","message":"true","label":"unnamed-chunk-1","context":"interactive","autorun":"false","output":"true","fig-cap":"","classes":"","out-width":"700px","comment":""},"code":"library(palmerpenguins)\nstr(penguins)","id":1},{"options":{"warning":"true","read-only":"false","dpi":72,"fig-height":5,"fig-width":7,"results":"markup","out-height":"","message":"true","label":"unnamed-chunk-2","context":"interactive","autorun":"false","output":"true","fig-cap":"","classes":"","out-width":"700px","comment":""},"code":"library(ggplot2) # part of tidyverse\nggplot(data = penguins, mapping = aes(x = bill_depth_mm)) +\n  geom_histogram() \n\n# explore with different parameters\nggplot(penguins, aes(bill_depth_mm)) + geom_histogram(bins = 40)\nggplot(penguins, aes(bill_depth_mm)) + geom_histogram(binwidth = 1)","id":2},{"options":{"warning":"true","read-only":"false","dpi":72,"fig-height":5,"fig-width":7,"results":"markup","out-height":"","message":"true","label":"unnamed-chunk-3","context":"interactive","autorun":"false","output":"true","fig-cap":"","classes":"","out-width":"700px","comment":""},"code":"p <- ggplot(penguins, aes(bill_depth_mm))\n\np + geom_density() \np + geom_freqpoly()\np + geom_boxplot()\np + geom_violin(aes(y = \"\"))\np + geom_dotplot()\np + stat_bin()","id":3},{"options":{"warning":"true","read-only":"false","dpi":72,"fig-height":5,"fig-width":7,"results":"markup","out-height":"","message":"true","label":"unnamed-chunk-4","context":"interactive","autorun":"false","output":"true","fig-cap":"","classes":"","out-width":"700px","comment":""},"code":"library(ggplot2)\nlibrary(palmerpenguins)\nggplot(penguins, \n       aes(x = bill_depth_mm, \n           y = bill_length_mm,\n           color = species,\n           size = body_mass_g)) +\n  geom_point()","id":4},{"options":{"warning":"true","read-only":"false","dpi":72,"fig-height":5,"fig-width":7,"results":"markup","out-height":"","message":"true","label":"unnamed-chunk-5","context":"interactive","autorun":"false","output":"true","fig-cap":"","classes":"","out-width":"700px","comment":""},"code":"ggplot(penguins, aes(x = bill_depth_mm, y = bill_length_mm)) +\n  geom_point(aes(color = \"dodgerblue\"))","id":5},{"options":{"warning":"true","read-only":"false","dpi":72,"fig-height":5,"fig-width":7,"results":"markup","out-height":"","message":"true","label":"unnamed-chunk-6","context":"interactive","autorun":"false","output":"true","fig-cap":"","classes":"","out-width":"700px","comment":""},"code":"ggplot(penguins, aes(x = bill_depth_mm, y = bill_length_mm)) +\n  geom_point(color = \"dodgerblue\")","id":6},{"options":{"warning":"true","read-only":"false","dpi":72,"fig-height":5,"fig-width":7,"results":"markup","out-height":"","message":"true","label":"unnamed-chunk-7","context":"interactive","autorun":"false","output":"true","fig-cap":"","classes":"","out-width":"700px","comment":""},"code":"ggplot(penguins, aes(x = bill_depth_mm, y = bill_length_mm)) +\n  geom_point(aes(color = I(\"dodgerblue\")))","id":7},{"options":{"warning":"true","read-only":"false","dpi":72,"fig-height":5,"fig-width":7,"results":"markup","out-height":"","message":"true","label":"unnamed-chunk-8","context":"interactive","autorun":"false","output":"true","fig-cap":"","classes":"","out-width":"700px","comment":""},"code":"ggplot(penguins, aes(x = bill_depth_mm, y = bill_length_mm),\n       color = \"dodgerblue\") +\n  geom_point()","id":8}];
+  globalThis.qwebrCellDetails = [{"options":{"message":"true","autorun":"false","comment":"","classes":"","read-only":"false","warning":"true","out-width":"700px","label":"unnamed-chunk-1","results":"markup","context":"interactive","out-height":"","fig-height":5,"dpi":72,"fig-width":7,"fig-cap":"","output":"true"},"id":1,"code":"library(palmerpenguins)\nstr(penguins)"},{"options":{"message":"true","autorun":"false","comment":"","classes":"","read-only":"false","warning":"true","out-width":"700px","label":"unnamed-chunk-2","results":"markup","context":"interactive","out-height":"","fig-height":5,"dpi":72,"fig-width":7,"fig-cap":"","output":"true"},"id":2,"code":"library(ggplot2) # part of tidyverse\nggplot(data = penguins, mapping = aes(x = bill_depth_mm)) +\n  geom_histogram() \n\n# explore with different parameters\nggplot(penguins, aes(bill_depth_mm)) + geom_histogram(bins = 40)\nggplot(penguins, aes(bill_depth_mm)) + geom_histogram(binwidth = 1)"},{"options":{"message":"true","autorun":"false","comment":"","classes":"","read-only":"false","warning":"true","out-width":"700px","label":"unnamed-chunk-3","results":"markup","context":"interactive","out-height":"","fig-height":5,"dpi":72,"fig-width":7,"fig-cap":"","output":"true"},"id":3,"code":"p <- ggplot(penguins, aes(bill_depth_mm))\n\np + geom_density() \np + geom_freqpoly()\np + geom_boxplot()\np + geom_violin(aes(y = \"\"))\np + geom_dotplot()\np + stat_bin()"},{"options":{"message":"true","autorun":"false","comment":"","classes":"","read-only":"false","warning":"true","out-width":"700px","label":"unnamed-chunk-4","results":"markup","context":"interactive","out-height":"","fig-height":5,"dpi":72,"fig-width":7,"fig-cap":"","output":"true"},"id":4,"code":"library(ggplot2)\nlibrary(palmerpenguins)\nggplot(penguins, \n       aes(x = bill_depth_mm, \n           y = bill_length_mm,\n           color = species,\n           size = body_mass_g)) +\n  geom_point()"},{"options":{"message":"true","autorun":"false","comment":"","classes":"","read-only":"false","warning":"true","out-width":"700px","label":"unnamed-chunk-5","results":"markup","context":"interactive","out-height":"","fig-height":5,"dpi":72,"fig-width":7,"fig-cap":"","output":"true"},"id":5,"code":"ggplot(penguins, aes(x = bill_depth_mm, y = bill_length_mm)) +\n  geom_point(aes(color = \"dodgerblue\"))"},{"options":{"message":"true","autorun":"false","comment":"","classes":"","read-only":"false","warning":"true","out-width":"700px","label":"unnamed-chunk-6","results":"markup","context":"interactive","out-height":"","fig-height":5,"dpi":72,"fig-width":7,"fig-cap":"","output":"true"},"id":6,"code":"ggplot(penguins, aes(x = bill_depth_mm, y = bill_length_mm)) +\n  geom_point(color = \"dodgerblue\")"},{"options":{"message":"true","autorun":"false","comment":"","classes":"","read-only":"false","warning":"true","out-width":"700px","label":"unnamed-chunk-7","results":"markup","context":"interactive","out-height":"","fig-height":5,"dpi":72,"fig-width":7,"fig-cap":"","output":"true"},"id":7,"code":"ggplot(penguins, aes(x = bill_depth_mm, y = bill_length_mm)) +\n  geom_point(aes(color = I(\"dodgerblue\")))"},{"options":{"message":"true","autorun":"false","comment":"","classes":"","read-only":"false","warning":"true","out-width":"700px","label":"unnamed-chunk-8","results":"markup","context":"interactive","out-height":"","fig-height":5,"dpi":72,"fig-width":7,"fig-cap":"","output":"true"},"id":8,"code":"ggplot(penguins, aes(x = bill_depth_mm, y = bill_length_mm),\n       color = \"dodgerblue\") +\n  geom_point()"}];
 
   </script>
   <script type="module">
@@ -12017,8 +12017,8 @@ <h2>Other layers for univariate data</h2>
 <h2>Available <code>geom</code> layers in <code>ggplot2</code></h2>
 <div class="cell">
 <div class="cell-output-display">
-<div class="datatables html-widget html-fill-item" id="htmlwidget-7b1dc36df2cc3a5ed1e5" style="width:100%;height:auto;"></div>
-<script type="application/json" data-for="htmlwidget-7b1dc36df2cc3a5ed1e5">{"x":{"filter":"none","vertical":false,"data":[["geom_abline, geom_hline, geom_vline","geom_bar, geom_col","geom_bin_2d, geom_bin2d","geom_blank","geom_boxplot","geom_contour, geom_contour_filled","geom_count","geom_density","geom_density_2d, geom_density2d, geom_density_2d_filled, geom_density2d_filled","geom_dotplot","geom_errorbarh","geom_function","geom_hex","geom_freqpoly, geom_histogram","geom_jitter","geom_crossbar, geom_errorbar, geom_linerange, geom_pointrange","geom_map","geom_path, geom_line, geom_step","geom_point","geom_polygon","geom_qq_line, geom_qq","geom_quantile","geom_ribbon, geom_area","geom_rug","geom_segment, geom_curve","geom_smooth","geom_spoke","geom_label, geom_text","geom_raster, geom_rect, geom_tile","geom_violin","geom_sf, geom_sf_label, geom_sf_text"],["Reference lines: horizontal, vertical, and diagonal","Bar charts","Heatmap of 2d bin counts","Draw nothing","A box and whiskers plot (in the style of Tukey)","2D contours of a 3D surface","Count overlapping points","Smoothed density estimates","Contours of a 2D density estimate","Dot plot","Horizontal error bars","Draw a function as a continuous curve","Hexagonal heatmap of 2d bin counts","Histograms and frequency polygons","Jittered points","Vertical intervals: lines, crossbars &amp; errorbars","Polygons from a reference map","Connect observations","Points","Polygons","A quantile-quantile plot","Quantile regression","Ribbons and area plots","Rug plots in the margins","Line segments and curves","Smoothed conditional means","Line segments parameterised by location, direction and distance","Text","Rectangles","Violin plot","Visualise sf objects"]],"container":"<table class=\"display\">\n  <thead>\n    <tr>\n      <th>geom<\/th>\n      <th>Description<\/th>\n    <\/tr>\n  <\/thead>\n<\/table>","options":{"dom":"tp","ordering":false,"scrollY":"500px","paging":false,"columnDefs":[{"name":"geom","targets":0},{"name":"Title","targets":1}],"order":[],"autoWidth":false,"orderClasses":false},"selection":{"mode":"multiple","selected":null,"target":"row","selectable":null}},"evals":[],"jsHooks":[]}</script>
+<div class="datatables html-widget html-fill-item" id="htmlwidget-e79b0bfc92660ebadd47" style="width:100%;height:auto;"></div>
+<script type="application/json" data-for="htmlwidget-e79b0bfc92660ebadd47">{"x":{"filter":"none","vertical":false,"data":[["geom_abline, geom_hline, geom_vline","geom_bar, geom_col","geom_bin_2d, geom_bin2d","geom_blank","geom_boxplot","geom_contour, geom_contour_filled","geom_count","geom_density","geom_density_2d, geom_density2d, geom_density_2d_filled, geom_density2d_filled","geom_dotplot","geom_errorbarh","geom_function","geom_hex","geom_freqpoly, geom_histogram","geom_jitter","geom_crossbar, geom_errorbar, geom_linerange, geom_pointrange","geom_map","geom_path, geom_line, geom_step","geom_point","geom_polygon","geom_qq_line, geom_qq","geom_quantile","geom_ribbon, geom_area","geom_rug","geom_segment, geom_curve","geom_smooth","geom_spoke","geom_label, geom_text","geom_raster, geom_rect, geom_tile","geom_violin","geom_sf, geom_sf_label, geom_sf_text"],["Reference lines: horizontal, vertical, and diagonal","Bar charts","Heatmap of 2d bin counts","Draw nothing","A box and whiskers plot (in the style of Tukey)","2D contours of a 3D surface","Count overlapping points","Smoothed density estimates","Contours of a 2D density estimate","Dot plot","Horizontal error bars","Draw a function as a continuous curve","Hexagonal heatmap of 2d bin counts","Histograms and frequency polygons","Jittered points","Vertical intervals: lines, crossbars &amp; errorbars","Polygons from a reference map","Connect observations","Points","Polygons","A quantile-quantile plot","Quantile regression","Ribbons and area plots","Rug plots in the margins","Line segments and curves","Smoothed conditional means","Line segments parameterised by location, direction and distance","Text","Rectangles","Violin plot","Visualise sf objects"]],"container":"<table class=\"display\">\n  <thead>\n    <tr>\n      <th>geom<\/th>\n      <th>Description<\/th>\n    <\/tr>\n  <\/thead>\n<\/table>","options":{"dom":"tp","ordering":false,"scrollY":"500px","paging":false,"columnDefs":[{"name":"geom","targets":0},{"name":"Title","targets":1}],"order":[],"autoWidth":false,"orderClasses":false},"selection":{"mode":"multiple","selected":null,"target":"row","selectable":null}},"evals":[],"jsHooks":[]}</script>
 </div>
 </div>
 </section>
@@ -12026,8 +12026,8 @@ <h2>Available <code>geom</code> layers in <code>ggplot2</code></h2>
 <h2>Available <code>stat</code> layers in <code>ggplot2</code></h2>
 <div class="cell">
 <div class="cell-output-display">
-<div class="datatables html-widget html-fill-item" id="htmlwidget-ce8ac467603a27da03ec" style="width:100%;height:auto;"></div>
-<script type="application/json" data-for="htmlwidget-ce8ac467603a27da03ec">{"x":{"filter":"none","vertical":false,"data":[["stat_count","stat_bin_2d, stat_bin2d","stat_boxplot","stat_contour, stat_contour_filled","stat_sum","stat_density","stat_density_2d, stat_density2d, stat_density_2d_filled","stat_function","stat_bin_hex, stat_binhex","stat_bin","stat_qq_line, stat_qq","stat_quantile","stat_align","stat_smooth","stat_spoke","stat_ydensity","stat_sf","stat_ecdf","stat_ellipse","stat_identity","stat_sf_coordinates","stat_summary_bin, stat_summary","stat_summary_2d, stat_summary2d, stat_summary_hex","stat_unique","update_stat_defaults"],["Bar charts","Heatmap of 2d bin counts","A box and whiskers plot (in the style of Tukey)","2D contours of a 3D surface","Count overlapping points","Smoothed density estimates","Contours of a 2D density estimate","Draw a function as a continuous curve","Hexagonal heatmap of 2d bin counts","Histograms and frequency polygons","A quantile-quantile plot","Quantile regression","Ribbons and area plots","Smoothed conditional means","Line segments parameterised by location, direction and distance","Violin plot","Visualise sf objects","Compute empirical cumulative distribution","Compute normal data ellipses","Leave data as is","Extract coordinates from 'sf' objects","Summarise y values at unique/binned x","Bin and summarise in 2d (rectangle &amp; hexagons)","Remove duplicates","Modify geom/stat aesthetic defaults for future plots"]],"container":"<table class=\"display\">\n  <thead>\n    <tr>\n      <th>stat<\/th>\n      <th>Description<\/th>\n    <\/tr>\n  <\/thead>\n<\/table>","options":{"dom":"tp","paging":false,"ordering":false,"scrollY":"500px","columnDefs":[{"name":"stats","targets":0},{"name":"Title","targets":1}],"order":[],"autoWidth":false,"orderClasses":false},"selection":{"mode":"multiple","selected":null,"target":"row","selectable":null}},"evals":[],"jsHooks":[]}</script>
+<div class="datatables html-widget html-fill-item" id="htmlwidget-c0ee9c82314df30c4213" style="width:100%;height:auto;"></div>
+<script type="application/json" data-for="htmlwidget-c0ee9c82314df30c4213">{"x":{"filter":"none","vertical":false,"data":[["stat_count","stat_bin_2d, stat_bin2d","stat_boxplot","stat_contour, stat_contour_filled","stat_sum","stat_density","stat_density_2d, stat_density2d, stat_density_2d_filled","stat_function","stat_bin_hex, stat_binhex","stat_bin","stat_qq_line, stat_qq","stat_quantile","stat_align","stat_smooth","stat_spoke","stat_ydensity","stat_sf","stat_ecdf","stat_ellipse","stat_identity","stat_sf_coordinates","stat_summary_bin, stat_summary","stat_summary_2d, stat_summary2d, stat_summary_hex","stat_unique","update_stat_defaults"],["Bar charts","Heatmap of 2d bin counts","A box and whiskers plot (in the style of Tukey)","2D contours of a 3D surface","Count overlapping points","Smoothed density estimates","Contours of a 2D density estimate","Draw a function as a continuous curve","Hexagonal heatmap of 2d bin counts","Histograms and frequency polygons","A quantile-quantile plot","Quantile regression","Ribbons and area plots","Smoothed conditional means","Line segments parameterised by location, direction and distance","Violin plot","Visualise sf objects","Compute empirical cumulative distribution","Compute normal data ellipses","Leave data as is","Extract coordinates from 'sf' objects","Summarise y values at unique/binned x","Bin and summarise in 2d (rectangle &amp; hexagons)","Remove duplicates","Modify geom/stat aesthetic defaults for future plots"]],"container":"<table class=\"display\">\n  <thead>\n    <tr>\n      <th>stat<\/th>\n      <th>Description<\/th>\n    <\/tr>\n  <\/thead>\n<\/table>","options":{"dom":"tp","paging":false,"ordering":false,"scrollY":"500px","columnDefs":[{"name":"stats","targets":0},{"name":"Title","targets":1}],"order":[],"autoWidth":false,"orderClasses":false},"selection":{"mode":"multiple","selected":null,"target":"row","selectable":null}},"evals":[],"jsHooks":[]}</script>
 </div>
 </div>
 </section>
@@ -13295,7 +13295,7 @@ <h2>Summary</h2>
 <li><strong>data</strong> as <code>data.frame</code></li>
 <li>a set of <strong>aesthetic</strong> mappings between variables in the data and visual properties</li>
 <li>at least one <strong>layer</strong> (usually <code>geom_</code> or <code>stat_</code> functions) which describes what to render</li>
-<li>the <strong>coordinate system</strong> (explained next)</li>
+<li>the <strong>coordinate system</strong> (explained later)</li>
 </ul>
 </section>
 <section id="ggplot2-cheatsheet" class="slide level2">
@@ -13315,7 +13315,7 @@ <h2><code>ggplot2</code> cheatsheet</h2>
 <section id="exercise-time" class="title-slide slide level1 center" data-background-color="#F5EDDE">
 <h1>Exercise time</h1>
 <p><a href="https://anu-bdsi.github.io/workshop-intro-R/materials.html#tabset-1-1-tab" class="f-headline"><i class="fas fa-laptop-code"></i></a></p>
-<p></p><div class="countdown" id="timer_1e29d6d9" data-update-every="1" tabindex="0" style="right:0;bottom:0;font-size:3em;"> <div class="countdown-controls"><button class="countdown-bump-down">−</button><button class="countdown-bump-up">+</button></div> <code class="countdown-time"><span class="countdown-digits minutes">30</span><span class="countdown-digits colon">:</span><span class="countdown-digits seconds">00</span></code> </div><p></p>
+<p></p><div class="countdown" id="timer_0699bed4" data-update-every="1" tabindex="0" style="right:0;bottom:0;font-size:3em;"> <div class="countdown-controls"><button class="countdown-bump-down">−</button><button class="countdown-bump-up">+</button></div> <code class="countdown-time"><span class="countdown-digits minutes">30</span><span class="countdown-digits colon">:</span><span class="countdown-digits seconds">00</span></code> </div><p></p>
 
 <div class="quarto-auto-generated-content">
 <p><img src="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKsAAADICAMAAACgVuHfAAAAM1BMVEVHcEy+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw4LZbQGAAAAEHRSTlMA4PBgIBCgQMCAMNCwcFCQyHondAAAAAlwSFlzAAAsSgAALEoBd3p0TQAADB1JREFUeJztnemyrCoMRhUHnOX9n/aUCApkIPZgu6vO9+PWPd1tsxpDQgKyi6IoBv18NYXVaP6Clg21+hOopttYe/DyM+VZy+7RslbqWfvi2fqLrOsfYu3+CGv9h1i1Y9Xg3WdJPYV1Bq8AdQ9h1aYBr6XyjOOPWVuT71jPan7F2tT2v8aU9p8D+MCpzk1efsZalOM6FLNtfmnLFrx/yvsq77vulzbGqG2Il8oYxTGErODNe9QFEzrWxbe/Z61P1JJ1Bv3vWYvpYOV9gWNtfsfarFIbcKz6Z6y6jJMUZnD9mnU1iVQFPuPV7wmXdRzgzRvU6LnvfNeOU18xTj5g7cCbd8knpgzno1i3aEDffiv9BNbOmLYZM17gMaxrUTTt32Ddb34rY51vY8Vs0k8EF/BOJMfa38ZaYrAybazljayDmcBrV1jNzvr6l1xQe2WanNhvwJqx7Lcpu7kuGmXbWdpSQJzmi/exbpjjNv0rJyVrLM0Xm9tYoxKvYifVVL54H2sRzP4yzmAsw3zxGEg3sp51/hK8F4vIF+9jHYLlk1xbk8E+u7PeUH6NVyRGrmhB5Ys769dLmgNYk+Kba7F88S7Wqu9OXNW1vWZcAZEvbv9qbioVD671XIRM8sXDXvbc4R5W7ZNV8M6m4xeQ+eLJmvF5n2FVQ0uw1ke61egKzxdP1kxm9gEtRg3bsBmxr1pNVCPE8sU7Wfvd8nq0ElHGSb/PF8MpgbqzX93Qx6xt8KvYTi2SL3Y3shKqVDjoe8+1WuKHsdpZSupNfb64Bp97Amsx+J5VBwSWLz6CtWjGNPZjegar28KSKf89g9XPq/jZ1zNYK2Omes3F+WewTmobQ4tCI9qhnfLXS5yu9N5MbCq+s6aR95n6z/od/Wf9jv4a6/xr1gWb0ULtWeGPWSc+Bng9gbXOTQScfsuq7fS0NzYJKIYMwm9Za6Xaqim3guzSqlx5/sc2EFXkVvB2rB+zNkE5iC92P2BsBRvF+R0kD2Ctz4Q76wu+wzqs2/eqac6MlmIOawN8VvAV1noNjHDkcOtwb1Zmt8s3WKukfWMmak24KdOPlqwdfJa16VXavEXoiSG+lS/9FX3Flbo9a/Uh1roFlIda8vb6zgVvAH1uTqgnABgbI9HANgjHW1k1MFOoEZ36bQsCW40oYwAHa/kmawWWhHCVFSBqzNjYgla+/U/UMiownmmpdJjp0b7QUCbyUdYrpMbSRsOs8eygx4HeZG3mi6RWtFNg9RYr4U6/RfsG6+ukm6brffMy63ukhnG4pF5krd8mfYH2XN9CHTUuLpheEx4eCJnra8efIzU2PIAGKF1m/SzpJVpjH9iYpKy5CcqLtNScEbKK9+ZIJii7VNf3fSt/mBmEXkwXWOGMH5ea5mN6r3vpz0tCLyYxqzDsdzNIQ/Qq7N9MMAv26HFVD1nYL1cys6pa0U9tOYcb7H1Ed3bsLUkcfza/HmaJOTDhwbFye6AFToru0ORHbwW27JdRLiy7t3zIko7QQjkNfdZ6kexBwJpzUmrCv5ZXU02Z7kVdWMAK6+ALTyq986iWlR9siAsLnjFJk17eSY39pTuPaZh5a0hdmNtUXgPWhSPN19SEaio2ZreRJRDP8DF2uhXNQZtQup+mnvY/gTjfENltyHr0VQN29HmVrcREhzOwdiJTGWjjLc/fGz5z6l+Fe1XdZaug3RqMcUEVdruONN4j9vuEIEhiBvSWsHVULzLyi1wGZbx+n2H4nLz7OqS5qcqDwg5Nv0Tya1HjdWBlwLp39gDaEIwlQTASd68Gxut2xhq3pnBuLtfhp5RkLC2yOZT7Rsk9Sn56d7IWRTgpPFklg74mbIyVJI6EY21nHUJWh++2ywkGfS7wMJL0wzHWlqMTy6KIJi/N3PeCqRM0q4uSzHuape99RFk84rWHeUXzUJE1XAjWx62HEwJSlBtMMbZzmMCrUKIIU0RHJhnZwQ50eAmk2sq3n/W6RuptghqGElTfBiosRerSHESUq+eN9wxX2eqbcCyheXM+ETJ54z17M1clYuezPGkhroKRlxfH0zCFs1zuwBJJMYNtKk/LXn6Ggn3PAZYdymn5pjZa1n/kLg9SQizjgqJpRYsVZJVR5S8PIqstFgmSE5xWvKyCWoKopNkGA0ritKx02tw4X6kRNImHljnX2FF1kt0xrrnlqKzKEpREdbXuzzx1wvSxSLKsFZQKteYw7PmbZIcOut/EfgOrOvnyaBIQlt/qeXIdpzr5L/eKSkCyzDdSPU9uUJRn1XkJH6sNHEEyWlV7pcQCzNmo9ULvpubsAeMn+c2xRQqWB0CMp0TEfqmfQIKxm6nGK0XjMdCwQ0vJqmgo3KGJadFqj+tMFT2L1h5RtgYXiGg1TSqhRUl9Z1qkc7DNZxAjGmVpiaaktOTl+9Cu4ifWhxMdWk2OlmxKRssYz/6BNZlanSaBGaynxYIUMaIwISstdU+TenMdk0g1HdEAN1inNCgO67U8sYyS5FyBYT6BwssCg83kKmqa96iihetWKe7UL1rrRbAKOhw3OkqzrcHWh3m8qS2PfbOCcI6nFmQC57lQw9RrPTRaz9L1yVBqOvJYLVqASwHbWetma72dUzKvFn3eXpRmB5oSX3FxWxRWLwjuuNc2P0Dn2+gMGRfqleRr+R0601nhkpbNDdAPC3cNoUtoF2ipSVKJJNkTMOFLtC1FKqNFb0nhTSD9GTYGkA1maMmmZLTM5St2JIw1AiqM8rRMUwJaPo8tQcpSOCNgqwQNGg/5piJaLEpl8lg75GEDxMuRQFC8lsem0T+fx7bQC1gptLvT5iqfEBnVvZDHDvO0G8MoyWNJw1yl9e3G/hEJkrPWc9/nd+FL1FOP9dTBjyj3WQbh8xiFi0gjEoYy8ln0cGLgjnQ6/YOfxZZX8tBiAEsJmaETqzm2qU8BBf57ddCxp4dhdvckl+NeSeon6uCHuktKxjWNZ8eGy51k9iIgldJq5Ngs261UT1VBx0bT2HweS5NKaOPL/dEZXLe6IbX/b/IgEEubIc3Rppe7rpy5bnXxwN0BnbRG0srmUWR8AzuWnI/fDgpkunUfUv5AOPC3WNB9XqApWsi0D5mM+zDV8t3qhpT/MTB+p6U4NmVGFC8NoauQvqfsbYWZSig7pFym02AJTNm6M62G5ZV8zJRtb8Melc25nrTDhT0i3lmJcr1Xk9NAXkq2HIvJDwrb47laux1eozNMfK8Oq2n2PaNlm0sieVTrPbmBtctagQ/CF3e+d8noq+HQ4XSESDtsMhZQHFZ6dP+7eazcT5zB3BoikanG2m/86U2FtChpIfa/wbRj763sVHrvChPDSmhJUhltePmOimUDmGx0U1FJj6dlSYts3Tu63KEiYQeXJVORwdRgboo3RYkuCceX76gKhjhSezfGMwAi65bnsZglpJPx66g4LFLEvjTvj59MR/PY+gVUDwuSnXo+FwZlG1xjDb3Lg0tsVXJ3QVdRPWyH9Nuex5Jf2OhtF9gCSbKqXkT1c0L+UXugd/LYPRUZX1pz3pNZJVytt/YI8lh5XWY3VfRGSuSmLpPscnSc0/lAokXhA0Qsf86hwPZwUqlXa1ysofIkkVw6u2a6liE1uUryGdYujg0gd2/Yrh14UrZCHzwnILQ1Rv7AELJrkYV/RDSt61TmL9lckDv3FO/azN2PLAGzW2+pmTNTxPJPSICbdHHej2xxdIfVXnCMWblaQfyVL+RTxozh3fH29alOjb81bIqe1I4d9TNCQ2rQHviE/PFBof9BjLXzJ6g3SP0gqjP5rar8QZqvyY+CqBt0xDOmeWxUl4lcgfdz5RsP2HHymUjkEc4JP7LvIjhSJSI9Hr0iPdn78qlBdN92WtQjFd5QYvfq7emzYyrVMZ6itpeOJN3fjj593J4v3f6gJb/dkNvizcgbKh3IPil/2DhZPWZ03JdvjH5M3jFevosH6YgNwy/paPTKcSLH4H/jD0a9pCMM4Fs/oI6fd4+hxjrqPpJu+ilpEYaBXEnjLGyyvu27ygQtq2Di+EPSIqLFdleFay3yHRzfUzDZKtclNIZhPheFfmWnqaK1+HI73mU74SWcL146e+jLAlvYQ13bTH+HqAfe0z2GT8GdkycMx3eOqvi+hqXvt8c4297t6f2UiqL4B+gIYbc2SwmBAAAAAElFTkSuQmCC" class="slide-logo"></p>
diff --git a/slides/slide2.html b/slides/slide2.html
index 93f440a..edd51af 100644
--- a/slides/slide2.html
+++ b/slides/slide2.html
@@ -7480,7 +7480,7 @@
   };
 
   // Store cell data
-  globalThis.qwebrCellDetails = [{"options":{"comment":"","read-only":"false","message":"true","warning":"true","out-height":"","out-width":"700px","autorun":"false","context":"interactive","results":"markup","classes":"","output":"true","dpi":72,"fig-height":5,"fig-width":7,"fig-cap":"","label":"unnamed-chunk-1"},"code":"ghist <- ggplot(penguins, aes(bill_depth_mm)) +\n  geom_histogram() \n\nlayer_data(ghist, 1)","id":1},{"options":{"comment":"","read-only":"false","message":"true","warning":"true","out-height":"","out-width":"700px","autorun":"false","context":"interactive","results":"markup","classes":"","output":"true","dpi":72,"fig-height":5,"fig-width":7,"fig-cap":"","label":"unnamed-chunk-2"},"code":"ggplot(penguins, aes(bill_depth_mm)) +\n  geom_histogram(aes(y = after_stat(density))) ","id":2},{"options":{"comment":"","read-only":"false","message":"true","warning":"true","out-height":"","out-width":"700px","autorun":"false","context":"interactive","results":"markup","classes":"","output":"true","dpi":72,"fig-height":5,"fig-width":7,"fig-cap":"","label":"unnamed-chunk-3"},"code":"library(palmerpenguins)\nggplot(penguins, aes(island)) +\n  geom_bar()\n\nggplot(penguins, aes(island)) +\n  stat_count(geom = \"point\", size = 3)","id":3},{"options":{"comment":"","read-only":"false","message":"true","warning":"true","out-height":"","out-width":"700px","autorun":"true","context":"interactive","results":"markup","classes":"","output":"true","dpi":72,"fig-height":5,"fig-width":7,"fig-cap":"","label":"unnamed-chunk-4"},"code":"penguins_summary <- penguins %>% \n  count(sex, species)\n\npenguins_summary","id":4},{"options":{"comment":"","read-only":"false","message":"true","warning":"true","out-height":"","out-width":"700px","autorun":"false","context":"interactive","results":"markup","classes":"","output":"true","dpi":72,"fig-height":5,"fig-width":7,"fig-cap":"","label":"unnamed-chunk-5"},"code":"ggplot(penguins_summary, \n       aes(x = species, y = n)) +\n  geom_col() ","id":5},{"options":{"comment":"","read-only":"false","message":"true","warning":"true","out-height":"","out-width":"700px","autorun":"false","context":"interactive","results":"markup","classes":"","output":"true","dpi":72,"fig-height":5,"fig-width":7,"fig-cap":"","label":"unnamed-chunk-6"},"code":"penguins_summary\n\nggplot(penguins_summary, aes(x = species, y = n, fill = sex)) +\n  geom_col(position = \"stack\") # default position","id":6},{"options":{"comment":"","read-only":"false","message":"true","warning":"true","out-height":"","out-width":"700px","autorun":"false","context":"interactive","results":"markup","classes":"","output":"true","dpi":72,"fig-height":5,"fig-width":7,"fig-cap":"","label":"unnamed-chunk-7"},"code":"ggplot(penguins_summary,\n       aes(species, n, fill = sex)) +\n  geom_col(position = \"dodge\")","id":7},{"options":{"comment":"","read-only":"false","message":"true","warning":"true","out-height":"","out-width":"700px","autorun":"false","context":"interactive","results":"markup","classes":"","output":"true","dpi":72,"fig-height":5,"fig-width":7,"fig-cap":"","label":"unnamed-chunk-8"},"code":"ggplot(penguins_summary, \n       aes(species, n, fill = sex)) +\n  geom_col(position = position_dodge(preserve = \"single\"))","id":8},{"options":{"comment":"","read-only":"false","message":"true","warning":"true","out-height":"","out-width":"700px","autorun":"false","context":"interactive","results":"markup","classes":"","output":"true","dpi":72,"fig-height":5,"fig-width":7,"fig-cap":"","label":"unnamed-chunk-9"},"code":"ggplot(penguins_summary, \n       aes(species, n, fill = sex)) +\n  geom_col(position = position_dodge2(padding = 0.1))","id":9},{"options":{"comment":"","read-only":"false","message":"true","warning":"true","out-height":"","out-width":"700px","autorun":"false","context":"interactive","results":"markup","classes":"","output":"true","dpi":72,"fig-height":5,"fig-width":7,"fig-cap":"","label":"unnamed-chunk-10"},"code":"ggplot(penguins_summary, \n       aes(species, n, fill = sex)) +\n  geom_col(position = \"fill\")","id":10},{"options":{"comment":"","read-only":"false","message":"true","warning":"true","out-height":"","out-width":"700px","autorun":"false","context":"interactive","results":"markup","classes":"","output":"true","dpi":72,"fig-height":5,"fig-width":7,"fig-cap":"","label":"unnamed-chunk-11"},"code":"ggplot(penguins_summary, \n       aes(species, n, fill = sex)) +\n  geom_col(position = \"fill\") +\n  coord_polar(\"y\")","id":11}];
+  globalThis.qwebrCellDetails = [{"id":1,"code":"ghist <- ggplot(penguins, aes(bill_depth_mm)) +\n  geom_histogram() \n\nlayer_data(ghist, 1)","options":{"fig-cap":"","results":"markup","dpi":72,"label":"unnamed-chunk-1","fig-width":7,"message":"true","output":"true","autorun":"false","out-width":"700px","read-only":"false","classes":"","comment":"","context":"interactive","fig-height":5,"warning":"true","out-height":""}},{"id":2,"code":"ggplot(penguins, aes(bill_depth_mm)) +\n  geom_histogram(aes(y = after_stat(density))) ","options":{"fig-cap":"","results":"markup","dpi":72,"label":"unnamed-chunk-2","fig-width":7,"message":"true","output":"true","autorun":"false","out-width":"700px","read-only":"false","classes":"","comment":"","context":"interactive","fig-height":5,"warning":"true","out-height":""}},{"id":3,"code":"library(palmerpenguins)\nggplot(penguins, aes(island)) +\n  geom_bar()\n\nggplot(penguins, aes(island)) +\n  stat_count(geom = \"point\", size = 3)","options":{"fig-cap":"","results":"markup","dpi":72,"label":"unnamed-chunk-3","fig-width":7,"message":"true","output":"true","autorun":"false","out-width":"700px","read-only":"false","classes":"","comment":"","context":"interactive","fig-height":5,"warning":"true","out-height":""}},{"id":4,"code":"penguins_summary <- penguins %>% \n  count(sex, species)\n\npenguins_summary","options":{"fig-cap":"","results":"markup","dpi":72,"label":"unnamed-chunk-4","fig-width":7,"message":"true","output":"true","autorun":"true","out-width":"700px","read-only":"false","classes":"","comment":"","context":"interactive","fig-height":5,"warning":"true","out-height":""}},{"id":5,"code":"ggplot(penguins_summary, \n       aes(x = species, y = n)) +\n  geom_col() ","options":{"fig-cap":"","results":"markup","dpi":72,"label":"unnamed-chunk-5","fig-width":7,"message":"true","output":"true","autorun":"false","out-width":"700px","read-only":"false","classes":"","comment":"","context":"interactive","fig-height":5,"warning":"true","out-height":""}},{"id":6,"code":"penguins_summary\n\nggplot(penguins_summary, aes(x = species, y = n, fill = sex)) +\n  geom_col(position = \"stack\") # default position","options":{"fig-cap":"","results":"markup","dpi":72,"label":"unnamed-chunk-6","fig-width":7,"message":"true","output":"true","autorun":"false","out-width":"700px","read-only":"false","classes":"","comment":"","context":"interactive","fig-height":5,"warning":"true","out-height":""}},{"id":7,"code":"ggplot(penguins_summary,\n       aes(species, n, fill = sex)) +\n  geom_col(position = \"dodge\")","options":{"fig-cap":"","results":"markup","dpi":72,"label":"unnamed-chunk-7","fig-width":7,"message":"true","output":"true","autorun":"false","out-width":"700px","read-only":"false","classes":"","comment":"","context":"interactive","fig-height":5,"warning":"true","out-height":""}},{"id":8,"code":"ggplot(penguins_summary, \n       aes(species, n, fill = sex)) +\n  geom_col(position = position_dodge(preserve = \"single\"))","options":{"fig-cap":"","results":"markup","dpi":72,"label":"unnamed-chunk-8","fig-width":7,"message":"true","output":"true","autorun":"false","out-width":"700px","read-only":"false","classes":"","comment":"","context":"interactive","fig-height":5,"warning":"true","out-height":""}},{"id":9,"code":"ggplot(penguins_summary, \n       aes(species, n, fill = sex)) +\n  geom_col(position = position_dodge2(padding = 0.1))","options":{"fig-cap":"","results":"markup","dpi":72,"label":"unnamed-chunk-9","fig-width":7,"message":"true","output":"true","autorun":"false","out-width":"700px","read-only":"false","classes":"","comment":"","context":"interactive","fig-height":5,"warning":"true","out-height":""}},{"id":10,"code":"ggplot(penguins_summary, \n       aes(species, n, fill = sex)) +\n  geom_col(position = \"fill\")","options":{"fig-cap":"","results":"markup","dpi":72,"label":"unnamed-chunk-10","fig-width":7,"message":"true","output":"true","autorun":"false","out-width":"700px","read-only":"false","classes":"","comment":"","context":"interactive","fig-height":5,"warning":"true","out-height":""}},{"id":11,"code":"ggplot(penguins_summary, \n       aes(species, n, fill = sex)) +\n  geom_col(position = \"fill\") +\n  coord_polar(\"y\")","options":{"fig-cap":"","results":"markup","dpi":72,"label":"unnamed-chunk-11","fig-width":7,"message":"true","output":"true","autorun":"false","out-width":"700px","read-only":"false","classes":"","comment":"","context":"interactive","fig-height":5,"warning":"true","out-height":""}}];
 
   </script>
   <script type="module">
@@ -9115,7 +9115,7 @@ <h2>Summary</h2>
 <section id="exercise-time" class="title-slide slide level1 center" data-background-color="#F5EDDE">
 <h1>Exercise time</h1>
 <p><a href="https://anu-bdsi.github.io/workshop-intro-R/materials.html#tabset-1-1-tab" class="f-headline"><i class="fas fa-laptop-code"></i></a></p>
-<p></p><div class="countdown" id="timer_0cf77172" data-update-every="1" tabindex="0" style="right:0;bottom:0;font-size:3em;"> <div class="countdown-controls"><button class="countdown-bump-down">−</button><button class="countdown-bump-up">+</button></div> <code class="countdown-time"><span class="countdown-digits minutes">30</span><span class="countdown-digits colon">:</span><span class="countdown-digits seconds">00</span></code> </div><p></p>
+<p></p><div class="countdown" id="timer_bad0e488" data-update-every="1" tabindex="0" style="right:0;bottom:0;font-size:3em;"> <div class="countdown-controls"><button class="countdown-bump-down">−</button><button class="countdown-bump-up">+</button></div> <code class="countdown-time"><span class="countdown-digits minutes">30</span><span class="countdown-digits colon">:</span><span class="countdown-digits seconds">00</span></code> </div><p></p>
 
 <div class="quarto-auto-generated-content">
 <p><img src="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKsAAADICAMAAACgVuHfAAAAM1BMVEVHcEy+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw4LZbQGAAAAEHRSTlMA4PBgIBCgQMCAMNCwcFCQyHondAAAAAlwSFlzAAAsSgAALEoBd3p0TQAADB1JREFUeJztnemyrCoMRhUHnOX9n/aUCApkIPZgu6vO9+PWPd1tsxpDQgKyi6IoBv18NYXVaP6Clg21+hOopttYe/DyM+VZy+7RslbqWfvi2fqLrOsfYu3+CGv9h1i1Y9Xg3WdJPYV1Bq8AdQ9h1aYBr6XyjOOPWVuT71jPan7F2tT2v8aU9p8D+MCpzk1efsZalOM6FLNtfmnLFrx/yvsq77vulzbGqG2Il8oYxTGErODNe9QFEzrWxbe/Z61P1JJ1Bv3vWYvpYOV9gWNtfsfarFIbcKz6Z6y6jJMUZnD9mnU1iVQFPuPV7wmXdRzgzRvU6LnvfNeOU18xTj5g7cCbd8knpgzno1i3aEDffiv9BNbOmLYZM17gMaxrUTTt32Ddb34rY51vY8Vs0k8EF/BOJMfa38ZaYrAybazljayDmcBrV1jNzvr6l1xQe2WanNhvwJqx7Lcpu7kuGmXbWdpSQJzmi/exbpjjNv0rJyVrLM0Xm9tYoxKvYifVVL54H2sRzP4yzmAsw3zxGEg3sp51/hK8F4vIF+9jHYLlk1xbk8E+u7PeUH6NVyRGrmhB5Ys769dLmgNYk+Kba7F88S7Wqu9OXNW1vWZcAZEvbv9qbioVD671XIRM8sXDXvbc4R5W7ZNV8M6m4xeQ+eLJmvF5n2FVQ0uw1ke61egKzxdP1kxm9gEtRg3bsBmxr1pNVCPE8sU7Wfvd8nq0ElHGSb/PF8MpgbqzX93Qx6xt8KvYTi2SL3Y3shKqVDjoe8+1WuKHsdpZSupNfb64Bp97Amsx+J5VBwSWLz6CtWjGNPZjegar28KSKf89g9XPq/jZ1zNYK2Omes3F+WewTmobQ4tCI9qhnfLXS5yu9N5MbCq+s6aR95n6z/od/Wf9jv4a6/xr1gWb0ULtWeGPWSc+Bng9gbXOTQScfsuq7fS0NzYJKIYMwm9Za6Xaqim3guzSqlx5/sc2EFXkVvB2rB+zNkE5iC92P2BsBRvF+R0kD2Ctz4Q76wu+wzqs2/eqac6MlmIOawN8VvAV1noNjHDkcOtwb1Zmt8s3WKukfWMmak24KdOPlqwdfJa16VXavEXoiSG+lS/9FX3Flbo9a/Uh1roFlIda8vb6zgVvAH1uTqgnABgbI9HANgjHW1k1MFOoEZ36bQsCW40oYwAHa/kmawWWhHCVFSBqzNjYgla+/U/UMiownmmpdJjp0b7QUCbyUdYrpMbSRsOs8eygx4HeZG3mi6RWtFNg9RYr4U6/RfsG6+ukm6brffMy63ukhnG4pF5krd8mfYH2XN9CHTUuLpheEx4eCJnra8efIzU2PIAGKF1m/SzpJVpjH9iYpKy5CcqLtNScEbKK9+ZIJii7VNf3fSt/mBmEXkwXWOGMH5ea5mN6r3vpz0tCLyYxqzDsdzNIQ/Qq7N9MMAv26HFVD1nYL1cys6pa0U9tOYcb7H1Ed3bsLUkcfza/HmaJOTDhwbFye6AFToru0ORHbwW27JdRLiy7t3zIko7QQjkNfdZ6kexBwJpzUmrCv5ZXU02Z7kVdWMAK6+ALTyq986iWlR9siAsLnjFJk17eSY39pTuPaZh5a0hdmNtUXgPWhSPN19SEaio2ZreRJRDP8DF2uhXNQZtQup+mnvY/gTjfENltyHr0VQN29HmVrcREhzOwdiJTGWjjLc/fGz5z6l+Fe1XdZaug3RqMcUEVdruONN4j9vuEIEhiBvSWsHVULzLyi1wGZbx+n2H4nLz7OqS5qcqDwg5Nv0Tya1HjdWBlwLp39gDaEIwlQTASd68Gxut2xhq3pnBuLtfhp5RkLC2yOZT7Rsk9Sn56d7IWRTgpPFklg74mbIyVJI6EY21nHUJWh++2ywkGfS7wMJL0wzHWlqMTy6KIJi/N3PeCqRM0q4uSzHuape99RFk84rWHeUXzUJE1XAjWx62HEwJSlBtMMbZzmMCrUKIIU0RHJhnZwQ50eAmk2sq3n/W6RuptghqGElTfBiosRerSHESUq+eN9wxX2eqbcCyheXM+ETJ54z17M1clYuezPGkhroKRlxfH0zCFs1zuwBJJMYNtKk/LXn6Ggn3PAZYdymn5pjZa1n/kLg9SQizjgqJpRYsVZJVR5S8PIqstFgmSE5xWvKyCWoKopNkGA0ritKx02tw4X6kRNImHljnX2FF1kt0xrrnlqKzKEpREdbXuzzx1wvSxSLKsFZQKteYw7PmbZIcOut/EfgOrOvnyaBIQlt/qeXIdpzr5L/eKSkCyzDdSPU9uUJRn1XkJH6sNHEEyWlV7pcQCzNmo9ULvpubsAeMn+c2xRQqWB0CMp0TEfqmfQIKxm6nGK0XjMdCwQ0vJqmgo3KGJadFqj+tMFT2L1h5RtgYXiGg1TSqhRUl9Z1qkc7DNZxAjGmVpiaaktOTl+9Cu4ifWhxMdWk2OlmxKRssYz/6BNZlanSaBGaynxYIUMaIwISstdU+TenMdk0g1HdEAN1inNCgO67U8sYyS5FyBYT6BwssCg83kKmqa96iihetWKe7UL1rrRbAKOhw3OkqzrcHWh3m8qS2PfbOCcI6nFmQC57lQw9RrPTRaz9L1yVBqOvJYLVqASwHbWetma72dUzKvFn3eXpRmB5oSX3FxWxRWLwjuuNc2P0Dn2+gMGRfqleRr+R0601nhkpbNDdAPC3cNoUtoF2ipSVKJJNkTMOFLtC1FKqNFb0nhTSD9GTYGkA1maMmmZLTM5St2JIw1AiqM8rRMUwJaPo8tQcpSOCNgqwQNGg/5piJaLEpl8lg75GEDxMuRQFC8lsem0T+fx7bQC1gptLvT5iqfEBnVvZDHDvO0G8MoyWNJw1yl9e3G/hEJkrPWc9/nd+FL1FOP9dTBjyj3WQbh8xiFi0gjEoYy8ln0cGLgjnQ6/YOfxZZX8tBiAEsJmaETqzm2qU8BBf57ddCxp4dhdvckl+NeSeon6uCHuktKxjWNZ8eGy51k9iIgldJq5Ngs261UT1VBx0bT2HweS5NKaOPL/dEZXLe6IbX/b/IgEEubIc3Rppe7rpy5bnXxwN0BnbRG0srmUWR8AzuWnI/fDgpkunUfUv5AOPC3WNB9XqApWsi0D5mM+zDV8t3qhpT/MTB+p6U4NmVGFC8NoauQvqfsbYWZSig7pFym02AJTNm6M62G5ZV8zJRtb8Melc25nrTDhT0i3lmJcr1Xk9NAXkq2HIvJDwrb47laux1eozNMfK8Oq2n2PaNlm0sieVTrPbmBtctagQ/CF3e+d8noq+HQ4XSESDtsMhZQHFZ6dP+7eazcT5zB3BoikanG2m/86U2FtChpIfa/wbRj763sVHrvChPDSmhJUhltePmOimUDmGx0U1FJj6dlSYts3Tu63KEiYQeXJVORwdRgboo3RYkuCceX76gKhjhSezfGMwAi65bnsZglpJPx66g4LFLEvjTvj59MR/PY+gVUDwuSnXo+FwZlG1xjDb3Lg0tsVXJ3QVdRPWyH9Nuex5Jf2OhtF9gCSbKqXkT1c0L+UXugd/LYPRUZX1pz3pNZJVytt/YI8lh5XWY3VfRGSuSmLpPscnSc0/lAokXhA0Qsf86hwPZwUqlXa1ysofIkkVw6u2a6liE1uUryGdYujg0gd2/Yrh14UrZCHzwnILQ1Rv7AELJrkYV/RDSt61TmL9lckDv3FO/azN2PLAGzW2+pmTNTxPJPSICbdHHej2xxdIfVXnCMWblaQfyVL+RTxozh3fH29alOjb81bIqe1I4d9TNCQ2rQHviE/PFBof9BjLXzJ6g3SP0gqjP5rar8QZqvyY+CqBt0xDOmeWxUl4lcgfdz5RsP2HHymUjkEc4JP7LvIjhSJSI9Hr0iPdn78qlBdN92WtQjFd5QYvfq7emzYyrVMZ6itpeOJN3fjj593J4v3f6gJb/dkNvizcgbKh3IPil/2DhZPWZ03JdvjH5M3jFevosH6YgNwy/paPTKcSLH4H/jD0a9pCMM4Fs/oI6fd4+hxjrqPpJu+ilpEYaBXEnjLGyyvu27ygQtq2Di+EPSIqLFdleFay3yHRzfUzDZKtclNIZhPheFfmWnqaK1+HI73mU74SWcL146e+jLAlvYQ13bTH+HqAfe0z2GT8GdkycMx3eOqvi+hqXvt8c4297t6f2UiqL4B+gIYbc2SwmBAAAAAElFTkSuQmCC" class="slide-logo"></p>
diff --git a/slides/slide3.html b/slides/slide3.html
index bfc08c4..5dd9902 100644
--- a/slides/slide3.html
+++ b/slides/slide3.html
@@ -7458,7 +7458,7 @@
   };
 
   // Store cell data
-  globalThis.qwebrCellDetails = [{"options":{"read-only":"false","message":"true","autorun":"false","warning":"true","results":"markup","out-height":"","context":"interactive","comment":"","fig-height":5,"fig-cap":"","classes":"","dpi":72,"output":"true","fig-width":7,"label":"unnamed-chunk-1","out-width":"700px"},"code":"library(palmerpenguins)\nlibrary(tidyverse)\nggplot(penguins, aes(x = island, y = body_mass_g)) +\n  geom_violin() +\n  geom_boxplot(width = 0.1)","id":1},{"options":{"read-only":"false","message":"true","autorun":"false","warning":"true","results":"markup","out-height":"","context":"interactive","comment":"","fig-height":5,"fig-cap":"","classes":"","dpi":72,"output":"true","fig-width":7,"label":"unnamed-chunk-2","out-width":"700px"},"code":"data(wallace.iowaland, package = \"agridat\")\nglimpse(wallace.iowaland)\nmap_data(\"county\", region = \"iowa\")","id":2},{"options":{"read-only":"false","message":"true","autorun":"false","warning":"true","results":"markup","out-height":"","context":"interactive","comment":"","fig-height":5,"fig-cap":"","classes":"","dpi":72,"output":"true","fig-width":7,"label":"unnamed-chunk-3","out-width":"700px"},"code":"ggplot(wallace.iowaland, aes(x = long, y = lat)) +\n  geom_point(size = 4, shape = \"square\", color = \"black\") +\n  geom_point(aes(color = yield), size = 2) ","id":3},{"options":{"read-only":"false","message":"true","autorun":"false","warning":"true","results":"markup","out-height":"","context":"interactive","comment":"","fig-height":5,"fig-cap":"","classes":"","dpi":72,"output":"true","fig-width":7,"label":"unnamed-chunk-4","out-width":"700px"},"code":"ggplot(wallace.iowaland, aes(x = long, y = lat)) +\n  geom_polygon(data = map_data(\"county\", region = \"iowa\"),\n               aes(group = group), fill = \"white\", color = \"black\") +\n  geom_point(size = 4, shape = \"square\", color = \"black\") +\n  geom_point(aes(color = yield), size = 2) ","id":4},{"options":{"read-only":"false","message":"true","autorun":"false","warning":"true","results":"markup","out-height":"","context":"interactive","comment":"","fig-height":5,"fig-cap":"","classes":"","dpi":72,"output":"true","fig-width":7,"label":"unnamed-chunk-5","out-width":"700px"},"code":"ggplot(wallace.iowaland, aes(x = long, y = lat)) +\n  geom_polygon(data = map_data(\"county\", region = \"iowa\"),\n               aes(group = group), fill = \"white\", color = \"black\") +\n  geom_point(size = 4, shape = \"square\", color = \"black\") +\n  geom_point(aes(color = yield), size = 2) +\n  geom_label(data = function(.data) subset(.data, yield  > quantile(yield, 0.95)),\n            aes(label = county), nudge_y = -0.1, size = 3)","id":5},{"options":{"read-only":"false","message":"true","autorun":"false","warning":"true","results":"markup","out-height":"","context":"interactive","comment":"","fig-height":5,"fig-cap":"","classes":"","dpi":72,"output":"true","fig-width":7,"label":"unnamed-chunk-6","out-width":"700px"},"code":"ggplot(wallace.iowaland, aes(x = long, y = lat)) +\n  geom_polygon(data = map_data(\"county\", region = \"iowa\"),\n               aes(group = group), fill = \"white\", color = \"black\") +\n  geom_point(aes(color = yield), size = 2) +\n  annotate(\"segment\", x = -95, y = 40.3, xend = -94.5, yend = 40.6, color = \"red\") +\n  annotate(\"label\", x = -95, y = 40.3, label = \"Iowa\", color = \"red\") ","id":6}];
+  globalThis.qwebrCellDetails = [{"id":1,"code":"library(palmerpenguins)\nlibrary(tidyverse)\nggplot(penguins, aes(x = island, y = body_mass_g)) +\n  geom_violin() +\n  geom_boxplot(width = 0.1)","options":{"fig-width":7,"comment":"","autorun":"false","out-width":"700px","warning":"true","fig-height":5,"results":"markup","context":"interactive","label":"unnamed-chunk-1","read-only":"false","message":"true","output":"true","fig-cap":"","out-height":"","classes":"","dpi":72}},{"id":2,"code":"data(wallace.iowaland, package = \"agridat\")\nglimpse(wallace.iowaland)\nmap_data(\"county\", region = \"iowa\")","options":{"fig-width":7,"comment":"","autorun":"false","out-width":"700px","warning":"true","fig-height":5,"results":"markup","context":"interactive","label":"unnamed-chunk-2","read-only":"false","message":"true","output":"true","fig-cap":"","out-height":"","classes":"","dpi":72}},{"id":3,"code":"ggplot(wallace.iowaland, aes(x = long, y = lat)) +\n  geom_point(size = 4, shape = \"square\", color = \"black\") +\n  geom_point(aes(color = yield), size = 2) ","options":{"fig-width":7,"comment":"","autorun":"false","out-width":"700px","warning":"true","fig-height":5,"results":"markup","context":"interactive","label":"unnamed-chunk-3","read-only":"false","message":"true","output":"true","fig-cap":"","out-height":"","classes":"","dpi":72}},{"id":4,"code":"ggplot(wallace.iowaland, aes(x = long, y = lat)) +\n  geom_polygon(data = map_data(\"county\", region = \"iowa\"),\n               aes(group = group), fill = \"white\", color = \"black\") +\n  geom_point(size = 4, shape = \"square\", color = \"black\") +\n  geom_point(aes(color = yield), size = 2) ","options":{"fig-width":7,"comment":"","autorun":"false","out-width":"700px","warning":"true","fig-height":5,"results":"markup","context":"interactive","label":"unnamed-chunk-4","read-only":"false","message":"true","output":"true","fig-cap":"","out-height":"","classes":"","dpi":72}},{"id":5,"code":"ggplot(wallace.iowaland, aes(x = long, y = lat)) +\n  geom_polygon(data = map_data(\"county\", region = \"iowa\"),\n               aes(group = group), fill = \"white\", color = \"black\") +\n  geom_point(size = 4, shape = \"square\", color = \"black\") +\n  geom_point(aes(color = yield), size = 2) +\n  geom_label(data = function(.data) subset(.data, yield  > quantile(yield, 0.95)),\n            aes(label = county), nudge_y = -0.1, size = 3)","options":{"fig-width":7,"comment":"","autorun":"false","out-width":"700px","warning":"true","fig-height":5,"results":"markup","context":"interactive","label":"unnamed-chunk-5","read-only":"false","message":"true","output":"true","fig-cap":"","out-height":"","classes":"","dpi":72}},{"id":6,"code":"ggplot(wallace.iowaland, aes(x = long, y = lat)) +\n  geom_polygon(data = map_data(\"county\", region = \"iowa\"),\n               aes(group = group), fill = \"white\", color = \"black\") +\n  geom_point(aes(color = yield), size = 2) +\n  annotate(\"segment\", x = -95, y = 40.3, xend = -94.5, yend = 40.6, color = \"red\") +\n  annotate(\"label\", x = -95, y = 40.3, label = \"Iowa\", color = \"red\") ","options":{"fig-width":7,"comment":"","autorun":"false","out-width":"700px","warning":"true","fig-height":5,"results":"markup","context":"interactive","label":"unnamed-chunk-6","read-only":"false","message":"true","output":"true","fig-cap":"","out-height":"","classes":"","dpi":72}}];
 
   </script>
   <script type="module">
@@ -8475,7 +8475,7 @@ <h2>Summary</h2>
 <section id="exercise-time" class="title-slide slide level1 center" data-background-color="#F5EDDE">
 <h1>Exercise time</h1>
 <p><a href="https://anu-bdsi.github.io/workshop-intro-R/materials.html#tabset-1-1-tab" class="f-headline"><i class="fas fa-laptop-code"></i></a></p>
-<p></p><div class="countdown" id="timer_dad10caf" data-update-every="1" tabindex="0" style="right:0;bottom:0;font-size:3em;"> <div class="countdown-controls"><button class="countdown-bump-down">−</button><button class="countdown-bump-up">+</button></div> <code class="countdown-time"><span class="countdown-digits minutes">20</span><span class="countdown-digits colon">:</span><span class="countdown-digits seconds">00</span></code> </div><p></p>
+<p></p><div class="countdown" id="timer_1297c990" data-update-every="1" tabindex="0" style="right:0;bottom:0;font-size:3em;"> <div class="countdown-controls"><button class="countdown-bump-down">−</button><button class="countdown-bump-up">+</button></div> <code class="countdown-time"><span class="countdown-digits minutes">20</span><span class="countdown-digits colon">:</span><span class="countdown-digits seconds">00</span></code> </div><p></p>
 
 <div class="quarto-auto-generated-content">
 <p><img src="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKsAAADICAMAAACgVuHfAAAAM1BMVEVHcEy+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw4LZbQGAAAAEHRSTlMA4PBgIBCgQMCAMNCwcFCQyHondAAAAAlwSFlzAAAsSgAALEoBd3p0TQAADB1JREFUeJztnemyrCoMRhUHnOX9n/aUCApkIPZgu6vO9+PWPd1tsxpDQgKyi6IoBv18NYXVaP6Clg21+hOopttYe/DyM+VZy+7RslbqWfvi2fqLrOsfYu3+CGv9h1i1Y9Xg3WdJPYV1Bq8AdQ9h1aYBr6XyjOOPWVuT71jPan7F2tT2v8aU9p8D+MCpzk1efsZalOM6FLNtfmnLFrx/yvsq77vulzbGqG2Il8oYxTGErODNe9QFEzrWxbe/Z61P1JJ1Bv3vWYvpYOV9gWNtfsfarFIbcKz6Z6y6jJMUZnD9mnU1iVQFPuPV7wmXdRzgzRvU6LnvfNeOU18xTj5g7cCbd8knpgzno1i3aEDffiv9BNbOmLYZM17gMaxrUTTt32Ddb34rY51vY8Vs0k8EF/BOJMfa38ZaYrAybazljayDmcBrV1jNzvr6l1xQe2WanNhvwJqx7Lcpu7kuGmXbWdpSQJzmi/exbpjjNv0rJyVrLM0Xm9tYoxKvYifVVL54H2sRzP4yzmAsw3zxGEg3sp51/hK8F4vIF+9jHYLlk1xbk8E+u7PeUH6NVyRGrmhB5Ys769dLmgNYk+Kba7F88S7Wqu9OXNW1vWZcAZEvbv9qbioVD671XIRM8sXDXvbc4R5W7ZNV8M6m4xeQ+eLJmvF5n2FVQ0uw1ke61egKzxdP1kxm9gEtRg3bsBmxr1pNVCPE8sU7Wfvd8nq0ElHGSb/PF8MpgbqzX93Qx6xt8KvYTi2SL3Y3shKqVDjoe8+1WuKHsdpZSupNfb64Bp97Amsx+J5VBwSWLz6CtWjGNPZjegar28KSKf89g9XPq/jZ1zNYK2Omes3F+WewTmobQ4tCI9qhnfLXS5yu9N5MbCq+s6aR95n6z/od/Wf9jv4a6/xr1gWb0ULtWeGPWSc+Bng9gbXOTQScfsuq7fS0NzYJKIYMwm9Za6Xaqim3guzSqlx5/sc2EFXkVvB2rB+zNkE5iC92P2BsBRvF+R0kD2Ctz4Q76wu+wzqs2/eqac6MlmIOawN8VvAV1noNjHDkcOtwb1Zmt8s3WKukfWMmak24KdOPlqwdfJa16VXavEXoiSG+lS/9FX3Flbo9a/Uh1roFlIda8vb6zgVvAH1uTqgnABgbI9HANgjHW1k1MFOoEZ36bQsCW40oYwAHa/kmawWWhHCVFSBqzNjYgla+/U/UMiownmmpdJjp0b7QUCbyUdYrpMbSRsOs8eygx4HeZG3mi6RWtFNg9RYr4U6/RfsG6+ukm6brffMy63ukhnG4pF5krd8mfYH2XN9CHTUuLpheEx4eCJnra8efIzU2PIAGKF1m/SzpJVpjH9iYpKy5CcqLtNScEbKK9+ZIJii7VNf3fSt/mBmEXkwXWOGMH5ea5mN6r3vpz0tCLyYxqzDsdzNIQ/Qq7N9MMAv26HFVD1nYL1cys6pa0U9tOYcb7H1Ed3bsLUkcfza/HmaJOTDhwbFye6AFToru0ORHbwW27JdRLiy7t3zIko7QQjkNfdZ6kexBwJpzUmrCv5ZXU02Z7kVdWMAK6+ALTyq986iWlR9siAsLnjFJk17eSY39pTuPaZh5a0hdmNtUXgPWhSPN19SEaio2ZreRJRDP8DF2uhXNQZtQup+mnvY/gTjfENltyHr0VQN29HmVrcREhzOwdiJTGWjjLc/fGz5z6l+Fe1XdZaug3RqMcUEVdruONN4j9vuEIEhiBvSWsHVULzLyi1wGZbx+n2H4nLz7OqS5qcqDwg5Nv0Tya1HjdWBlwLp39gDaEIwlQTASd68Gxut2xhq3pnBuLtfhp5RkLC2yOZT7Rsk9Sn56d7IWRTgpPFklg74mbIyVJI6EY21nHUJWh++2ywkGfS7wMJL0wzHWlqMTy6KIJi/N3PeCqRM0q4uSzHuape99RFk84rWHeUXzUJE1XAjWx62HEwJSlBtMMbZzmMCrUKIIU0RHJhnZwQ50eAmk2sq3n/W6RuptghqGElTfBiosRerSHESUq+eN9wxX2eqbcCyheXM+ETJ54z17M1clYuezPGkhroKRlxfH0zCFs1zuwBJJMYNtKk/LXn6Ggn3PAZYdymn5pjZa1n/kLg9SQizjgqJpRYsVZJVR5S8PIqstFgmSE5xWvKyCWoKopNkGA0ritKx02tw4X6kRNImHljnX2FF1kt0xrrnlqKzKEpREdbXuzzx1wvSxSLKsFZQKteYw7PmbZIcOut/EfgOrOvnyaBIQlt/qeXIdpzr5L/eKSkCyzDdSPU9uUJRn1XkJH6sNHEEyWlV7pcQCzNmo9ULvpubsAeMn+c2xRQqWB0CMp0TEfqmfQIKxm6nGK0XjMdCwQ0vJqmgo3KGJadFqj+tMFT2L1h5RtgYXiGg1TSqhRUl9Z1qkc7DNZxAjGmVpiaaktOTl+9Cu4ifWhxMdWk2OlmxKRssYz/6BNZlanSaBGaynxYIUMaIwISstdU+TenMdk0g1HdEAN1inNCgO67U8sYyS5FyBYT6BwssCg83kKmqa96iihetWKe7UL1rrRbAKOhw3OkqzrcHWh3m8qS2PfbOCcI6nFmQC57lQw9RrPTRaz9L1yVBqOvJYLVqASwHbWetma72dUzKvFn3eXpRmB5oSX3FxWxRWLwjuuNc2P0Dn2+gMGRfqleRr+R0601nhkpbNDdAPC3cNoUtoF2ipSVKJJNkTMOFLtC1FKqNFb0nhTSD9GTYGkA1maMmmZLTM5St2JIw1AiqM8rRMUwJaPo8tQcpSOCNgqwQNGg/5piJaLEpl8lg75GEDxMuRQFC8lsem0T+fx7bQC1gptLvT5iqfEBnVvZDHDvO0G8MoyWNJw1yl9e3G/hEJkrPWc9/nd+FL1FOP9dTBjyj3WQbh8xiFi0gjEoYy8ln0cGLgjnQ6/YOfxZZX8tBiAEsJmaETqzm2qU8BBf57ddCxp4dhdvckl+NeSeon6uCHuktKxjWNZ8eGy51k9iIgldJq5Ngs261UT1VBx0bT2HweS5NKaOPL/dEZXLe6IbX/b/IgEEubIc3Rppe7rpy5bnXxwN0BnbRG0srmUWR8AzuWnI/fDgpkunUfUv5AOPC3WNB9XqApWsi0D5mM+zDV8t3qhpT/MTB+p6U4NmVGFC8NoauQvqfsbYWZSig7pFym02AJTNm6M62G5ZV8zJRtb8Melc25nrTDhT0i3lmJcr1Xk9NAXkq2HIvJDwrb47laux1eozNMfK8Oq2n2PaNlm0sieVTrPbmBtctagQ/CF3e+d8noq+HQ4XSESDtsMhZQHFZ6dP+7eazcT5zB3BoikanG2m/86U2FtChpIfa/wbRj763sVHrvChPDSmhJUhltePmOimUDmGx0U1FJj6dlSYts3Tu63KEiYQeXJVORwdRgboo3RYkuCceX76gKhjhSezfGMwAi65bnsZglpJPx66g4LFLEvjTvj59MR/PY+gVUDwuSnXo+FwZlG1xjDb3Lg0tsVXJ3QVdRPWyH9Nuex5Jf2OhtF9gCSbKqXkT1c0L+UXugd/LYPRUZX1pz3pNZJVytt/YI8lh5XWY3VfRGSuSmLpPscnSc0/lAokXhA0Qsf86hwPZwUqlXa1ysofIkkVw6u2a6liE1uUryGdYujg0gd2/Yrh14UrZCHzwnILQ1Rv7AELJrkYV/RDSt61TmL9lckDv3FO/azN2PLAGzW2+pmTNTxPJPSICbdHHej2xxdIfVXnCMWblaQfyVL+RTxozh3fH29alOjb81bIqe1I4d9TNCQ2rQHviE/PFBof9BjLXzJ6g3SP0gqjP5rar8QZqvyY+CqBt0xDOmeWxUl4lcgfdz5RsP2HHymUjkEc4JP7LvIjhSJSI9Hr0iPdn78qlBdN92WtQjFd5QYvfq7emzYyrVMZ6itpeOJN3fjj593J4v3f6gJb/dkNvizcgbKh3IPil/2DhZPWZ03JdvjH5M3jFevosH6YgNwy/paPTKcSLH4H/jD0a9pCMM4Fs/oI6fd4+hxjrqPpJu+ilpEYaBXEnjLGyyvu27ygQtq2Di+EPSIqLFdleFay3yHRzfUzDZKtclNIZhPheFfmWnqaK1+HI73mU74SWcL146e+jLAlvYQ13bTH+HqAfe0z2GT8GdkycMx3eOqvi+hqXvt8c4297t6f2UiqL4B+gIYbc2SwmBAAAAAElFTkSuQmCC" class="slide-logo"></p>
diff --git a/slides/slide4.html b/slides/slide4.html
index 1554858..2f582ca 100644
--- a/slides/slide4.html
+++ b/slides/slide4.html
@@ -7361,7 +7361,7 @@ <h2>Summary</h2>
 <section id="exercise-time" class="title-slide slide level1 center" data-background-color="#F5EDDE">
 <h1>Exercise time</h1>
 <p><a href="https://anu-bdsi.github.io/workshop-intro-R/materials.html#tabset-1-1-tab" class="f-headline"><i class="fas fa-laptop-code"></i></a></p>
-<p></p><div class="countdown" id="timer_df04a332" data-update-every="1" tabindex="0" style="right:0;bottom:0;font-size:3em;"> <div class="countdown-controls"><button class="countdown-bump-down">−</button><button class="countdown-bump-up">+</button></div> <code class="countdown-time"><span class="countdown-digits minutes"></span><span class="countdown-digits colon">:</span><span class="countdown-digits seconds"></span></code> </div><p></p>
+<p></p><div class="countdown" id="timer_fb6f2a40" data-update-every="1" tabindex="0" style="right:0;bottom:0;font-size:3em;"> <div class="countdown-controls"><button class="countdown-bump-down">−</button><button class="countdown-bump-up">+</button></div> <code class="countdown-time"><span class="countdown-digits minutes"></span><span class="countdown-digits colon">:</span><span class="countdown-digits seconds"></span></code> </div><p></p>
 
 <div class="quarto-auto-generated-content">
 <p><img src="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKsAAADICAMAAACgVuHfAAAAM1BMVEVHcEy+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw6+gw4LZbQGAAAAEHRSTlMA4PBgIBCgQMCAMNCwcFCQyHondAAAAAlwSFlzAAAsSgAALEoBd3p0TQAADB1JREFUeJztnemyrCoMRhUHnOX9n/aUCApkIPZgu6vO9+PWPd1tsxpDQgKyi6IoBv18NYXVaP6Clg21+hOopttYe/DyM+VZy+7RslbqWfvi2fqLrOsfYu3+CGv9h1i1Y9Xg3WdJPYV1Bq8AdQ9h1aYBr6XyjOOPWVuT71jPan7F2tT2v8aU9p8D+MCpzk1efsZalOM6FLNtfmnLFrx/yvsq77vulzbGqG2Il8oYxTGErODNe9QFEzrWxbe/Z61P1JJ1Bv3vWYvpYOV9gWNtfsfarFIbcKz6Z6y6jJMUZnD9mnU1iVQFPuPV7wmXdRzgzRvU6LnvfNeOU18xTj5g7cCbd8knpgzno1i3aEDffiv9BNbOmLYZM17gMaxrUTTt32Ddb34rY51vY8Vs0k8EF/BOJMfa38ZaYrAybazljayDmcBrV1jNzvr6l1xQe2WanNhvwJqx7Lcpu7kuGmXbWdpSQJzmi/exbpjjNv0rJyVrLM0Xm9tYoxKvYifVVL54H2sRzP4yzmAsw3zxGEg3sp51/hK8F4vIF+9jHYLlk1xbk8E+u7PeUH6NVyRGrmhB5Ys769dLmgNYk+Kba7F88S7Wqu9OXNW1vWZcAZEvbv9qbioVD671XIRM8sXDXvbc4R5W7ZNV8M6m4xeQ+eLJmvF5n2FVQ0uw1ke61egKzxdP1kxm9gEtRg3bsBmxr1pNVCPE8sU7Wfvd8nq0ElHGSb/PF8MpgbqzX93Qx6xt8KvYTi2SL3Y3shKqVDjoe8+1WuKHsdpZSupNfb64Bp97Amsx+J5VBwSWLz6CtWjGNPZjegar28KSKf89g9XPq/jZ1zNYK2Omes3F+WewTmobQ4tCI9qhnfLXS5yu9N5MbCq+s6aR95n6z/od/Wf9jv4a6/xr1gWb0ULtWeGPWSc+Bng9gbXOTQScfsuq7fS0NzYJKIYMwm9Za6Xaqim3guzSqlx5/sc2EFXkVvB2rB+zNkE5iC92P2BsBRvF+R0kD2Ctz4Q76wu+wzqs2/eqac6MlmIOawN8VvAV1noNjHDkcOtwb1Zmt8s3WKukfWMmak24KdOPlqwdfJa16VXavEXoiSG+lS/9FX3Flbo9a/Uh1roFlIda8vb6zgVvAH1uTqgnABgbI9HANgjHW1k1MFOoEZ36bQsCW40oYwAHa/kmawWWhHCVFSBqzNjYgla+/U/UMiownmmpdJjp0b7QUCbyUdYrpMbSRsOs8eygx4HeZG3mi6RWtFNg9RYr4U6/RfsG6+ukm6brffMy63ukhnG4pF5krd8mfYH2XN9CHTUuLpheEx4eCJnra8efIzU2PIAGKF1m/SzpJVpjH9iYpKy5CcqLtNScEbKK9+ZIJii7VNf3fSt/mBmEXkwXWOGMH5ea5mN6r3vpz0tCLyYxqzDsdzNIQ/Qq7N9MMAv26HFVD1nYL1cys6pa0U9tOYcb7H1Ed3bsLUkcfza/HmaJOTDhwbFye6AFToru0ORHbwW27JdRLiy7t3zIko7QQjkNfdZ6kexBwJpzUmrCv5ZXU02Z7kVdWMAK6+ALTyq986iWlR9siAsLnjFJk17eSY39pTuPaZh5a0hdmNtUXgPWhSPN19SEaio2ZreRJRDP8DF2uhXNQZtQup+mnvY/gTjfENltyHr0VQN29HmVrcREhzOwdiJTGWjjLc/fGz5z6l+Fe1XdZaug3RqMcUEVdruONN4j9vuEIEhiBvSWsHVULzLyi1wGZbx+n2H4nLz7OqS5qcqDwg5Nv0Tya1HjdWBlwLp39gDaEIwlQTASd68Gxut2xhq3pnBuLtfhp5RkLC2yOZT7Rsk9Sn56d7IWRTgpPFklg74mbIyVJI6EY21nHUJWh++2ywkGfS7wMJL0wzHWlqMTy6KIJi/N3PeCqRM0q4uSzHuape99RFk84rWHeUXzUJE1XAjWx62HEwJSlBtMMbZzmMCrUKIIU0RHJhnZwQ50eAmk2sq3n/W6RuptghqGElTfBiosRerSHESUq+eN9wxX2eqbcCyheXM+ETJ54z17M1clYuezPGkhroKRlxfH0zCFs1zuwBJJMYNtKk/LXn6Ggn3PAZYdymn5pjZa1n/kLg9SQizjgqJpRYsVZJVR5S8PIqstFgmSE5xWvKyCWoKopNkGA0ritKx02tw4X6kRNImHljnX2FF1kt0xrrnlqKzKEpREdbXuzzx1wvSxSLKsFZQKteYw7PmbZIcOut/EfgOrOvnyaBIQlt/qeXIdpzr5L/eKSkCyzDdSPU9uUJRn1XkJH6sNHEEyWlV7pcQCzNmo9ULvpubsAeMn+c2xRQqWB0CMp0TEfqmfQIKxm6nGK0XjMdCwQ0vJqmgo3KGJadFqj+tMFT2L1h5RtgYXiGg1TSqhRUl9Z1qkc7DNZxAjGmVpiaaktOTl+9Cu4ifWhxMdWk2OlmxKRssYz/6BNZlanSaBGaynxYIUMaIwISstdU+TenMdk0g1HdEAN1inNCgO67U8sYyS5FyBYT6BwssCg83kKmqa96iihetWKe7UL1rrRbAKOhw3OkqzrcHWh3m8qS2PfbOCcI6nFmQC57lQw9RrPTRaz9L1yVBqOvJYLVqASwHbWetma72dUzKvFn3eXpRmB5oSX3FxWxRWLwjuuNc2P0Dn2+gMGRfqleRr+R0601nhkpbNDdAPC3cNoUtoF2ipSVKJJNkTMOFLtC1FKqNFb0nhTSD9GTYGkA1maMmmZLTM5St2JIw1AiqM8rRMUwJaPo8tQcpSOCNgqwQNGg/5piJaLEpl8lg75GEDxMuRQFC8lsem0T+fx7bQC1gptLvT5iqfEBnVvZDHDvO0G8MoyWNJw1yl9e3G/hEJkrPWc9/nd+FL1FOP9dTBjyj3WQbh8xiFi0gjEoYy8ln0cGLgjnQ6/YOfxZZX8tBiAEsJmaETqzm2qU8BBf57ddCxp4dhdvckl+NeSeon6uCHuktKxjWNZ8eGy51k9iIgldJq5Ngs261UT1VBx0bT2HweS5NKaOPL/dEZXLe6IbX/b/IgEEubIc3Rppe7rpy5bnXxwN0BnbRG0srmUWR8AzuWnI/fDgpkunUfUv5AOPC3WNB9XqApWsi0D5mM+zDV8t3qhpT/MTB+p6U4NmVGFC8NoauQvqfsbYWZSig7pFym02AJTNm6M62G5ZV8zJRtb8Melc25nrTDhT0i3lmJcr1Xk9NAXkq2HIvJDwrb47laux1eozNMfK8Oq2n2PaNlm0sieVTrPbmBtctagQ/CF3e+d8noq+HQ4XSESDtsMhZQHFZ6dP+7eazcT5zB3BoikanG2m/86U2FtChpIfa/wbRj763sVHrvChPDSmhJUhltePmOimUDmGx0U1FJj6dlSYts3Tu63KEiYQeXJVORwdRgboo3RYkuCceX76gKhjhSezfGMwAi65bnsZglpJPx66g4LFLEvjTvj59MR/PY+gVUDwuSnXo+FwZlG1xjDb3Lg0tsVXJ3QVdRPWyH9Nuex5Jf2OhtF9gCSbKqXkT1c0L+UXugd/LYPRUZX1pz3pNZJVytt/YI8lh5XWY3VfRGSuSmLpPscnSc0/lAokXhA0Qsf86hwPZwUqlXa1ysofIkkVw6u2a6liE1uUryGdYujg0gd2/Yrh14UrZCHzwnILQ1Rv7AELJrkYV/RDSt61TmL9lckDv3FO/azN2PLAGzW2+pmTNTxPJPSICbdHHej2xxdIfVXnCMWblaQfyVL+RTxozh3fH29alOjb81bIqe1I4d9TNCQ2rQHviE/PFBof9BjLXzJ6g3SP0gqjP5rar8QZqvyY+CqBt0xDOmeWxUl4lcgfdz5RsP2HHymUjkEc4JP7LvIjhSJSI9Hr0iPdn78qlBdN92WtQjFd5QYvfq7emzYyrVMZ6itpeOJN3fjj593J4v3f6gJb/dkNvizcgbKh3IPil/2DhZPWZ03JdvjH5M3jFevosH6YgNwy/paPTKcSLH4H/jD0a9pCMM4Fs/oI6fd4+hxjrqPpJu+ilpEYaBXEnjLGyyvu27ygQtq2Di+EPSIqLFdleFay3yHRzfUzDZKtclNIZhPheFfmWnqaK1+HI73mU74SWcL146e+jLAlvYQ13bTH+HqAfe0z2GT8GdkycMx3eOqvi+hqXvt8c4297t6f2UiqL4B+gIYbc2SwmBAAAAAElFTkSuQmCC" class="slide-logo"></p>