Create crime01.R