Create Homicides.R