structure(list(record_id = c("331-1", "331-2"), first_name = c("aa", 
"bb"), last_name = c("AA", "BB"), address = c(NA_character_, 
NA_character_), telephone = c(NA_character_, NA_character_), 
    email = c(NA_character_, NA_character_), dob = c(NA_character_, 
    NA_character_), age = c(NA_character_, NA_character_), ethnicity = c(NA_character_, 
    NA_character_), race = c(NA_character_, NA_character_), sex = c(NA_character_, 
    NA_character_), height = c(NA_character_, NA_character_), 
    weight = c(NA_character_, NA_character_), bmi = c(NA_character_, 
    NA_character_), comments = c(NA_character_, NA_character_
    ), demographics_complete = c("0", "0")), row.names = c(NA, 
-2L), class = "data.frame")
