From 4a71c23ba7d6962c81bfd7d9da3bebd6ebc6f5e7 Mon Sep 17 00:00:00 2001
From: Hugo Gruson <Bisaloo@users.noreply.github.com>
Date: Thu, 25 Jan 2024 17:47:36 +0100
Subject: [PATCH] Restore package loading step

---
 episodes/model-choices.Rmd | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/episodes/model-choices.Rmd b/episodes/model-choices.Rmd
index b33f6b17..4a60e366 100644
--- a/episodes/model-choices.Rmd
+++ b/episodes/model-choices.Rmd
@@ -5,6 +5,12 @@ exercises: 20 # exercise time in minutes
 
 ---
 
+```{r setup, echo = FALSE, message = FALSE, warning = FALSE}
+library(epidemics)
+library(dplyr)
+library(ggplot2)
+```
+
 :::::::::::::::::::::::::::::::::::::: questions 
 
 - How do I choose a mathematical model that's appropriate to complete my analytical task?
@@ -372,7 +378,7 @@ output_samples <- Map(
   }
 )
 
-output_samples <- bind_rows(output_samples) # requires the tidyverse package
+output_samples <- bind_rows(output_samples) # requires the dplyr package
 
 ggplot(
   output_samples[output_samples$compartment == "infectious", ],