generator(4,0,2)
sigma <- matrix(c(1,0.8,0.8,1),nrow = 2, byrow = 2)
d <- generator(4,mean = c(1,2),sigma, sigmaSup = 1)
generator(10,1,coefvar = c(0.3,0.5))
generator(c(10,11,10),c(1,2),coefvar = c(0.3,0.5))
Run the code above in your browser using DataLab