powered by
V(X)
X.Bern <- RV(c(1,0), c(.5,.5)) E(X.Bern)
Run the code above in your browser using DataLab