powered by
simData(n=50, m=2, rr=1.5, rseed = 123)
dd <- simData(50, 2, 1.5, rseed=123) head(dd)
Run the code above in your browser using DataLab