data generation code snippets in r

generate synthetic dataset with rose in r