inst/test-data/specific-redcapr/read-oneshot/specify-forms-only-2nd.R

structure(list(race___1 = c(0, 0, 0, 0, 1), race___2 = c(0, 0, 
0, 1, 0), race___3 = c(0, 1, 0, 0, 0), race___4 = c(0, 0, 1, 
0, 0), race___5 = c(1, 1, 1, 1, 0), race___6 = c(0, 0, 0, 0, 
1), ethnicity = c(1, 1, 0, 1, 2), interpreter_needed = c(0, 0, 
1, NA, 0), race_and_ethnicity_complete = c(2, 0, 2, 2, 2)), row.names = c(NA, 
-5L), spec = structure(list(cols = list(race___1 = structure(list(), class = c("collector_double", 
"collector")), race___2 = structure(list(), class = c("collector_double", 
"collector")), race___3 = structure(list(), class = c("collector_double", 
"collector")), race___4 = structure(list(), class = c("collector_double", 
"collector")), race___5 = structure(list(), class = c("collector_double", 
"collector")), race___6 = structure(list(), class = c("collector_double", 
"collector")), ethnicity = structure(list(), class = c("collector_double", 
"collector")), interpreter_needed = structure(list(), class = c("collector_double", 
"collector")), race_and_ethnicity_complete = structure(list(), class = c("collector_double", 
"collector"))), default = structure(list(), class = c("collector_guess", 
"collector")), delim = ","), class = "col_spec"), class = c("spec_tbl_df", 
"tbl_df", "tbl", "data.frame"))
OuhscBbmc/REDCapR documentation built on Jan. 31, 2024, 8:30 p.m.