# Intiate multiwave object
MySurvey <- multiwave(phases = 2, waves = c(1, 3))
# To access overall metadata
get_mw(MySurvey, phase = NA, slot = "metadata")
# To write overall metadata
set_mw(MySurvey, phase = NA, slot = "metadata") <- list(
title = "Maternal Weight Survey"
)
# To access Phase 2 metadata
get_mw(MySurvey, phase = 2, slot = "metadata")
# To access Phase 2, Wave 2 design
get_mw(MySurvey, phase = 2, wave = 2, slot = "design")
Run the code above in your browser using DataLab