inst/snippet/glm-orings-predict2.R

1 - (1-p)^(1/6) -> q; q         # P(damage to particular O-ring)
1 - dbinom(0,6,q)               # P(damage to >0 O-rings)
cbind(0:6, dbinom(0:6,6,q))     # table of all probabilities

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.