d1 <- as_survey(gss_2024, ids = vpsu, weights = wtssps,
strata = vstrat, nest = TRUE)
d2 <- as_survey(gss_2024, ids = vpsu, weights = wtssps,
strata = vstrat, nest = TRUE)
# Explicit names
coll <- as_survey_collection("2020" = d1, "2024" = d2)
names(coll)
# Bare-symbol auto-naming
coll2 <- as_survey_collection(d1, d2)
names(coll2)
# Uniform grouping across members
coll3 <- as_survey_collection(d1, d2, group = vstrat)
coll3@groups
Run the code above in your browser using DataLab