Update crime.r