Create compare.two.groups_incident.ci95.R