district_name = "Nwoya District"
source ("vector_control.R") plot_irs_history(district_name, 2008) plot_itn_history(district_name, 2008, add=TRUE)