inst/snippet/spinner.R

probs <- dbinom(0:50,50,0.25)
sum(probs[probs <= dbinom(8,50,0.25)])    # sum the small probs
binom.test(8,50,0.25)                     # check with binom.test()

Try the fastR package in your browser

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

fastR documentation built on May 1, 2019, 11:18 p.m.