powered by
SofIID(X, n = 2, progress = TRUE, fractions = attr(X, "fractions"))
X.Bern <- RV(c(1,0), c(.5,.5)) S5 <- SofIID(X.Bern, 5) S128 <- SofIID(X.Bern, 128)
Run the code above in your browser using DataLab