inst/test-data/specific-redcapr/read-eav-oneshot/blank-for-gray-false.R

In OuhscBbmc/REDCapR: Interaction Between R and REDCap

structure(list(record = c("1", "1", "1", "1", "1", "1", "1", 
"1", "1", "1", "1", "1", "1", "1", "1", "1", "1", "1", "1", "1", 
"2", "2", "2", "2", "2", "2", "2", "2", "2", "2", "2", "2", "2", 
"2", "2", "2", "2", "2", "2", "2", "2", "3", "3", "3", "3", "3", 
"3", "3", "3", "3", "3", "3", "3", "3", "3", "3", "3", "3", "3", 
"3", "3", "3", "4", "4", "4", "4", "4", "4", "4", "4", "4", "4", 
"4", "4", "4", "4", "4", "4", "4", "4", "4", "4", "5", "5", "5", 
"5", "5", "5", "5", "5", "5", "5", "5", "5", "5", "5", "5", "5", 
"5", "5", "5", "5", "5", "6", "6", "6", "6"), field_name = c("address", 
"age", "bmi", "comments", "demographics_complete", "dob", "email", 
"ethnicity", "health_complete", "height", "interpreter_needed", 
"mugshot", "name_first", "name_last", "race", "race_and_ethnicity_complete", 
"record_id", "sex", "telephone", "weight", "address", "age", 
"bmi", "comments", "demographics_complete", "dob", "email", "ethnicity", 
"health_complete", "height", "interpreter_needed", "mugshot", 
"name_first", "name_last", "race", "race", "race_and_ethnicity_complete", 
"record_id", "sex", "telephone", "weight", "address", "age", 
"bmi", "comments", "demographics_complete", "dob", "email", "ethnicity", 
"health_complete", "height", "interpreter_needed", "mugshot", 
"name_first", "name_last", "race", "race", "race_and_ethnicity_complete", 
"record_id", "sex", "telephone", "weight", "address", "age", 
"bmi", "comments", "demographics_complete", "dob", "email", "ethnicity", 
"health_complete", "height", "mugshot", "name_first", "name_last", 
"race", "race", "race_and_ethnicity_complete", "record_id", "sex", 
"telephone", "weight", "address", "age", "bmi", "comments", "demographics_complete", 
"dob", "email", "ethnicity", "health_complete", "height", "interpreter_needed", 
"mugshot", "name_first", "name_last", "race", "race", "race_and_ethnicity_complete", 
"record_id", "sex", "telephone", "weight", "name_first", "name_last", 
"demographics_complete", "record_id"), value = c("14 Rose Cottage St.\nKenning UK, 323232", 
"11", "204.1", "Character in a book, with some guessing", "2", 
"2003-08-30", "nutty@mouse.com", "1", "1", "7", "0", "324901", 
"Nutmeg", "Nutmouse", "5", "2", "1", "0", "(405) 321-1111", "1", 
"14 Rose Cottage Blvd.\nKenning UK 34243", "11", "277.8", "A mouse character from a good book", 
"2", "2003-03-10", "tummy@mouse.comm", "1", "0", "6", "0", "324902", 
"Tumtum", "Nutmouse", "3", "5", "0", "2", "1", "(405) 321-2222", 
"1", "243 Hill St.\nGuthrie OK 73402", "80", "24.7", "completely made up", 
"2", "1934-04-09", "mw@mwood.net", "0", "2", "180", "1", "324903", 
"Marcus", "Wood", "4", "5", "2", "3", "1", "(405) 321-3333", 
"80", "342 Elm\nDuncanville TX, 75116", "61", "19.8", "This record doesn't have a DAG assigned\n\nSo call up Trudy on the telephone\nSend her a letter in the mail", 
"2", "1952-11-02", "peroxide@blonde.com", "1", "2", "165", "324904", 
"Trudy", "DAG", "2", "5", "2", "4", "0", "(405) 321-4444", "54", 
"Hotel Suite\nNew Orleans LA, 70115", "59", "27.9", "Had a hand for trouble and a eye for cash\n\nHe had a gold watch chain and a black mustache", 
"2", "1955-04-15", "left@hippocket.com", "2", "0", "193.04", 
"0", "324905", "John Lee", "Walker", "1", "6", "2", "5", "1", 
"(405) 321-5555", "104", "blank-for-gray", "blank-for-gray", 
"0", "6")), row.names = c(NA, -107L), spec = structure(list(cols = list(
    record = structure(list(), class = c("collector_character", 
    "collector")), field_name = structure(list(), class = c("collector_character", 
    "collector")), value = structure(list(), class = c("collector_character", 
    "collector"))), default = structure(list(), class = c("collector_character", 
"collector")), delim = ","), class = "col_spec"), class = c("spec_tbl_df", 
"tbl_df", "tbl", "data.frame"))