demo/sec7.2.R

# Table 7.2-1
dbinom(10:25, 25, 0.061)

# Pr[ number of successes >= 10 ]
sum( dbinom(10:25, 25, 0.061) )
pbinom(9, 25, 0.061, lower.tail=FALSE) 
1 - pbinom(9, 25, 0.061)

propPval(10, 25, p=0.061)

Try the abd package in your browser

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

abd documentation built on May 2, 2019, 4:46 p.m.