# A declaration is used in three ways.
# 1. To obtain some basic facts about a sampling procedure:
declaration <- declare_rs(N = 100, n = 30)
declaration
# 2. To draw a random sample:
S <- draw_rs(declaration)
table(S)
# 3. To obtain inclusion probabilities:
probs <- obtain_inclusion_probabilities(declaration)
table(probs, S)
# Simple Random Sampling Declarations
declare_rs(N = 100, simple = TRUE)
declare_rs(N = 100, prob = 0.4, simple = TRUE)
# Complete Random Sampling Declarations
declare_rs(N = 100)
declare_rs(N = 100, n = 30)
# Stratified Random Sampling Declarations
strata <- rep(c("A", "B", "C"), times = c(50, 100, 200))
declare_rs(strata = strata)
declare_rs(strata = strata, prob = 0.5)
# Cluster Random Sampling Declarations
clusters <- rep(letters[1:10], times = 1:10)
declare_rs(clusters = clusters)
declare_rs(clusters = clusters, n = 4)
# Stratified and Clustered Random Sampling Declarations
clusters <- rep(letters[1:12], times = 1:12)
strata <- rep(NA, length(clusters))
strata[clusters %in% letters[1:3]] <- "stratum_1"
strata[clusters %in% letters[4:6]] <- "stratum_2"
strata[clusters %in% letters[7:9]] <- "stratum_3"
strata[clusters %in% letters[10:12]] <- "stratum_4"
table(strata, clusters)
declare_rs(clusters = clusters, strata = strata)
declare_rs(clusters = clusters, strata = strata, prob = 0.3)
Run the code above in your browser using DataLab