Create crime03.R