# NOT RUN {
# feel free to ignore the following line<U+2014>it allows {broom} to supply
# examples without requiring the model-supplying package to be installed.
if (requireNamespace("binGroup", quietly = TRUE)) {
# load libraries for models and data
library(binGroup)
des <- binDesign(
nmax = 300, delta = 0.06,
p.hyp = 0.1, power = .8
)
glance(des)
tidy(des)
library(ggplot2)
ggplot(tidy(des), aes(n, power)) +
geom_line()
}
# }
Run the code above in your browser using DataLab