powered by
DataSimu()
set.seed(666) simulated.data<-DataSimu()
Run the code above in your browser using DataLab