structure(list(record_id = c(1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 
2, 2, 2, 2, 2, 2), redcap_repeat_instrument = c(NA, "blood_pressure", 
"blood_pressure", "blood_pressure", "laboratory", "laboratory", 
"image", "image", NA, "blood_pressure", "blood_pressure", "blood_pressure", 
"laboratory", "laboratory", "image", "image", "image"), redcap_repeat_instance = c(NA, 
1, 2, 3, 1, 2, 1, 2, NA, 1, 2, 3, 1, 2, 1, 2, 3), height = c(1, 
NA, NA, NA, NA, NA, NA, NA, 2, NA, NA, NA, NA, NA, NA, NA, NA
), weight = c(11, NA, NA, NA, NA, NA, NA, NA, 22, NA, NA, NA, 
NA, NA, NA, NA, NA), bmi = c(111, NA, NA, NA, NA, NA, NA, NA, 
222, NA, NA, NA, NA, NA, NA, NA, NA), intake_complete = c(2, 
NA, NA, NA, NA, NA, NA, NA, 2, NA, NA, NA, NA, NA, NA, NA, NA
), sbp = c(NA, 1.1, 1.2, 1.3, NA, NA, NA, NA, NA, 2.1, 2.2, 2.3, 
NA, NA, NA, NA, NA), dbp = c(NA, 11.1, 11.2, 11.3, NA, NA, NA, 
NA, NA, 22.1, 22.2, 22.3, NA, NA, NA, NA, NA), blood_pressure_complete = c(NA, 
2, 2, 2, NA, NA, NA, NA, NA, 2, 2, 2, NA, NA, NA, NA, NA), lab = c(NA, 
NA, NA, NA, "aa1", "aa2", NA, NA, NA, NA, NA, NA, "bb1", "bb2", 
NA, NA, NA), conc = c(NA, NA, NA, NA, "1.1 ppm", "1.2 ppm", NA, 
NA, NA, NA, NA, NA, "2.1 ppm", "2.2 ppm", NA, NA, NA), laboratory_complete = c(NA, 
NA, NA, NA, 2, 2, NA, NA, NA, NA, NA, NA, 2, 2, NA, NA, NA), 
    image_profile = c(NA, NA, NA, NA, NA, NA, "levon-and-barry.jpg", 
    "mugshot-1.jpg", NA, NA, NA, NA, NA, NA, "mugshot-2.jpg", 
    "mugshot-3.jpg", "mugshot-4.jpg"), image_complete = c(NA, 
    NA, NA, NA, NA, NA, 2, 0, NA, NA, NA, NA, NA, NA, 2, 1, 0
    )), row.names = c(NA, -17L), class = c("spec_tbl_df", "tbl_df", 
"tbl", "data.frame"))
