Add 2016 data to age group populations

odeleongt · May 20, 2017 · 4214d4b · 4214d4b
1 parent c352c18
commit 4214d4b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/scripts/collect-raw-vital-stats.R b/scripts/collect-raw-vital-stats.R
@@ -482,7 +482,7 @@ rm(processed_file)
 # Sum simple year projections for 
 flu_age_groups <- population %>%
  filter(
- between(year, 2010, 2015), # Years missing data
+ between(year, 2010, 2016), # Years missing data
  between(age, 0, 4), # Relevant ages
  department %in% c("Santa Rosa", "Quetzaltenango") # Relevant departments
  ) %>%