# Known CV, SRSWOR
SscSrsMean(TRUE, FALSE, 0.05, 0.2, 100, NA, cv_value = 0.3)
# Unknown CV, SRSWOR
prelim <- c(12, 14, 8, 5, 36, 24, 18, 17, 6, 9)
SscSrsMean(FALSE, FALSE, 0.05, 0.2, 100, prelim)
# Known CV, SRSWR
SscSrsMean(TRUE, TRUE, 0.05, 0.2, NA, NA, cv_value = 0.3)
Run the code above in your browser using DataLab