Update incident_count.R