# NOT RUN {
examples_dir <- system.file( "examples", package = "retroharmonize")
my_rds_files <- dir( examples_dir)[grepl(".rds",
dir(examples_dir))]
example_surveys <- read_surveys(file.path(examples_dir, my_rds_files))
waves_document <- document_waves(example_surveys)
attr(waves_document, "original_list" )
waves_document
# }
Run the code above in your browser using DataLab