render practical

Author: avallecam

instructors/files/04-practical-tutors.md

@@ -654,18 +654,18 @@ epidemics::epidemic_peak(data = simulate_intervention)
 # step: 
 # add intervention name
 # if your intervention is vaccination, then
-# activate the argument compartments_from_susceptible
+# activate the argument exclude_compartments
 # run and paste plot output in report
 
 infections_baseline <- epidemics::new_infections(
   data = simulate_baseline,
-  # compartments_from_susceptible = "vaccinated", # if vaccination
+  # exclude_compartments = "vaccinated", # if vaccination
   by_group = FALSE # if TRUE, then age-stratified output
 )
 
 infections_intervention <- epidemics::new_infections(
   data = simulate_intervention,
-  # compartments_from_susceptible = "vaccinated", # if vaccination
+  # exclude_compartments = "vaccinated", # if vaccination
   by_group = FALSE # if TRUE, then age-stratified output
 )
 
@@ -759,13 +759,13 @@ epidemics::epidemic_peak(data = simulate_intervention)
 
 infections_baseline <- epidemics::new_infections(
   data = simulate_baseline,
-  # compartments_from_susceptible = "vaccinated", # if vaccination
+  # exclude_compartments = "vaccinated", # if vaccination
   by_group = FALSE # if TRUE, then age-stratified output
 )
 
 infections_intervention <- epidemics::new_infections(
   data = simulate_intervention,
-  # compartments_from_susceptible = "vaccinated", # if vaccination
+  # exclude_compartments = "vaccinated", # if vaccination
   by_group = FALSE # if TRUE, then age-stratified output
 )
 
@@ -857,13 +857,13 @@ epidemics::epidemic_peak(data = simulate_intervention)
 
 infections_baseline <- epidemics::new_infections(
   data = simulate_baseline,
-  compartments_from_susceptible = "vaccinated", # if vaccination
+  exclude_compartments = "vaccinated", # if vaccination
   by_group = FALSE # if TRUE, then age-stratified output
 )
 
 infections_intervention <- epidemics::new_infections(
   data = simulate_intervention,
-  compartments_from_susceptible = "vaccinated", # if vaccination
+  exclude_compartments = "vaccinated", # if vaccination
   by_group = FALSE # if TRUE, then age-stratified output
 )
 
@@ -934,18 +934,18 @@ epidemics::epidemic_peak(simulate_twointerventions)
 # step: 
 # add intervention name
 # if your intervention is vaccination, then
-# activate the argument compartments_from_susceptible
+# activate the argument exclude_compartments
 # run and paste plot output in report
 
 infections_baseline <- epidemics::new_infections(
   data = simulate_baseline,
-  compartments_from_susceptible = "vaccinated", # if vaccination #<CHANGE-BY-ROOM>
+  exclude_compartments = "vaccinated", # if vaccination #<CHANGE-BY-ROOM>
   by_group = FALSE # if TRUE, then age-stratified output
 )
 
 infections_twointerventions <- epidemics::new_infections(
   data = simulate_twointerventions,
-  compartments_from_susceptible = "vaccinated", # if vaccination #<CHANGE-BY-ROOM>
+  exclude_compartments = "vaccinated", # if vaccination #<CHANGE-BY-ROOM>
   by_group = FALSE # if TRUE, then age-stratified output
 )