normalApproxBinomial(p0= if (number.vars==1) .5 else 0,
p1=NA, p2=NA,
p.hat=if (number.vars==1) .75 else 0,
n=1,
xlim=if (number.vars==1) c(0,1) else c(-1,1),
ylim=c(0, 5),
type=c("hypothesis","confidence"),
alpha.left=if (type=="hypothesis") 0 else .025,
alpha.right=if (type=="hypothesis") .05 else .025,
xlab=if (number.vars==1)
"w = p = population proportion"
else
"w = p[1] - p[2] :: population proportions", ...,
number.vars=if (!is.na(p1) && !is.na(p2)) 2 else 1)
xyplot
arguments...NTplot
."trellis"
object.NTplot
.NTplot(distribution.name="binomial", n=20, ylim=c(0,4.2), p1=.8)
NTplot(distribution.name="binomial", n=20, type="confidence", ylim=c(0,4.2))
NTplot(distribution.name="binomial", n=20, zaxis=TRUE, z1axis=TRUE, p1=.8678, ylim=c(0, 5.2))
NTplot(p0=.4, p.hat=.65, p1=.7, distribution.name="binomial", n=15)
NTplot(p.hat=.65, distribution.name="binomial", n=15, type="confidence")
## these are interactive and won't work in R CMD check
NTplot(distribution.name="binomial", n=20, ylim=c(0,4.2), p1=.8, shiny=TRUE)
NTplot(p0=.4, p.hat=.65, p1=.7, distribution.name="binomial", n=15, shiny=TRUE)
NTplot(p.hat=.65, distribution.name="binomial", n=15, type="confidence", shiny=TRUE)
Run the code above in your browser using DataLab