Update crime01.R