Update crime02.R