# \donttest{
dat <- data.frame(x=c(8, 15))
propTest2(dat, vars = x, areCounts = TRUE)
#
# PROPORTION TEST (2 OUTCOMES)
#
# Binomial Test
# -------------------------------------------------------
# Level Count Total Proportion p
# -------------------------------------------------------
# x 1 8 23 0.348 0.210
# 2 15 23 0.652 0.210
# -------------------------------------------------------
# Note. Ha is proportion != 0.5
#
# }
Run the code above in your browser using DataLab