inst/snippet/mom-beta01-sim.R

results<-as.data.frame(t(replicate(1000,beta.mom(rbeta(50,2,5)))))
plot1 <- xhistogram(~shape1, results, type='density',v=2)
plot2 <- xhistogram(~shape2, results, type='density',v=5)

Try the fastR package in your browser

Any scripts or data that you put into this service are public.

fastR documentation built on May 2, 2019, 5:53 p.m.