H_counts <- c(2, 2, 3) # three domains with 2, 2, and 3 strata respectively
# internal functions (not exported) – examples skipped
if (FALSE) {
H_cnt2dind(H_counts) # 1 1 2 2 3 3 3
}
# internal functions (not exported) – examples skipped
if (FALSE) {
H_cnt2glbidx(H_counts)
}
# internal functions (not exported) – examples skipped
if (FALSE) {
H_get_strata_indices(H_counts, 3) # 5 6 7
}
Run the code above in your browser using DataLab