test.r

estimate_pi(B=100, seed=123)

obj <- estimate_pi()
plot(obj)

estimate_pi2(B=100, seed=123)

obj <- estimate_pi2()
plot(obj)

runDemo()
amenirouatbi/ptds2018hw4g3 documentation built on May 3, 2019, 7:39 p.m.