powered by
RRgauss(mu, sd, log)
RMmodel
RRdistr(norm(mu=mu, sd=sd, log=log))
RFoptions(seed=0) r <- RFrdistr(RRgauss(mu=c(1,5)), n=1000, dim=2) plot(r[1,], r[2, ]) RFoptions(seed=NA)
Run the code above in your browser using DataLab