district_name = "Bugweri District"
source ("vector_control.R") plot_itn_history(district_name, 2009) -> tt lines(tt, 0*tt)