# NOT RUN {
# with counts
library(jmv)
subtitle_onesample_proptest(
data = as.data.frame(HairEyeColor),
main = Eye,
counts = Freq
)
# in case no variation, only sample size will be shown
subtitle_onesample_proptest(
data = cbind.data.frame(x = rep("a", 10)),
main = x
)
# }
Run the code above in your browser using DataCamp Workspace