Create generate.R