Delete make some data.R