powered by
simData1s(n = 10, m = 500, k = 0.5, psi = 1, f = 50)
obs
master
true
fec <- simData1s(n=10, m=500, k=0.5, psi=0.7)
Run the code above in your browser using DataLab