inst/test-data/project-longitudinal/expected/default.R

In REDCapR: Interaction Between R and REDCap

structure(list(study_id = c(100, 100, 100, 100, 100, 100, 220, 
220, 220, 220, 220, 220, 304, 304, 304, 304, 304, 304), redcap_event_name = c("enrollment_arm_1", 
"dose_1_arm_1", "visit_1_arm_1", "dose_2_arm_1", "visit_2_arm_1", 
"final_visit_arm_1", "enrollment_arm_1", "dose_1_arm_1", "visit_1_arm_1", 
"dose_2_arm_1", "visit_2_arm_1", "final_visit_arm_1", "enrollment_arm_2", 
"deadline_to_opt_ou_arm_2", "first_dose_arm_2", "first_visit_arm_2", 
"final_visit_arm_2", "deadline_to_return_arm_2"), date_enrolled = structure(c(16527, 
NA, NA, NA, NA, NA, 16527, NA, NA, NA, NA, NA, 16527, NA, NA, 
NA, NA, NA), class = "Date"), patient_document = c(NA, NA, NA, 
NA, NA, NA, NA, NA, NA, NA, NA, NA, "levon_and_barry.jpg", NA, 
NA, NA, NA, NA), first_name = c("Zharko", NA, NA, NA, NA, NA, 
"Milivoj", NA, NA, NA, NA, NA, "Melech", NA, NA, NA, NA, NA), 
    last_name = c("Lenox", NA, NA, NA, NA, NA, "Marcus", NA, 
    NA, NA, NA, NA, "Besnik", NA, NA, NA, NA, NA), telephone_1 = c("(415) 555-1212", 
    NA, NA, NA, NA, NA, "(432) 903-6676", NA, NA, NA, NA, NA, 
    "(242) 556-2396", NA, NA, NA, NA, NA), email = c("zlehnox@gmail.com", 
    NA, NA, NA, NA, NA, "Milivoj.Marcus@dsds.cmo", NA, NA, NA, 
    NA, NA, "Melech-Besnik@wa.org", NA, NA, NA, NA, NA), dob = structure(c(5013, 
    NA, NA, NA, NA, NA, 15017, NA, NA, NA, NA, NA, 12875, NA, 
    NA, NA, NA, NA), class = "Date"), age = c(31, NA, NA, NA, 
    NA, NA, 4, NA, NA, NA, NA, NA, 9, NA, NA, NA, NA, NA), ethnicity = c(0, 
    NA, NA, NA, NA, NA, 2, NA, NA, NA, NA, NA, 2, NA, NA, NA, 
    NA, NA), race = c(4, NA, NA, NA, NA, NA, 1, NA, NA, NA, NA, 
    NA, 4, NA, NA, NA, NA, NA), sex = c(1, NA, NA, NA, NA, NA, 
    0, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, NA), given_birth = c(NA, 
    NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, NA, 0, NA, NA, NA, 
    NA, NA), num_children = c(NA, NA, NA, NA, NA, NA, NA, NA, 
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), gym___0 = c(1, NA, 
    NA, NA, NA, NA, 1, NA, NA, NA, NA, NA, 1, NA, NA, NA, NA, 
    NA), gym___1 = c(0, NA, NA, NA, NA, NA, 1, NA, NA, NA, NA, 
    NA, 1, NA, NA, NA, NA, NA), gym___2 = c(0, NA, NA, NA, NA, 
    NA, 0, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, NA), gym___3 = c(0, 
    NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, NA, 0, NA, NA, NA, 
    NA, NA), gym___4 = c(0, NA, NA, NA, NA, NA, 0, NA, NA, NA, 
    NA, NA, 0, NA, NA, NA, NA, NA), aerobics___0 = c(0, NA, NA, 
    NA, NA, NA, 0, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, NA), 
    aerobics___1 = c(1, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, 
    NA, 0, NA, NA, NA, NA, NA), aerobics___2 = c(1, NA, NA, NA, 
    NA, NA, 1, NA, NA, NA, NA, NA, 1, NA, NA, NA, NA, NA), aerobics___3 = c(0, 
    NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, NA, 0, NA, NA, NA, 
    NA, NA), aerobics___4 = c(0, NA, NA, NA, NA, NA, 0, NA, NA, 
    NA, NA, NA, 0, NA, NA, NA, NA, NA), eat___0 = c(0, NA, NA, 
    NA, NA, NA, 0, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, NA), 
    eat___1 = c(0, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, NA, 
    0, NA, NA, NA, NA, NA), eat___2 = c(0, NA, NA, NA, NA, NA, 
    1, NA, NA, NA, NA, NA, 1, NA, NA, NA, NA, NA), eat___3 = c(1, 
    NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, NA, 0, NA, NA, NA, 
    NA, NA), eat___4 = c(0, NA, NA, NA, NA, NA, 0, NA, NA, NA, 
    NA, NA, 0, NA, NA, NA, NA, NA), drink___0 = c(0, NA, NA, 
    NA, NA, NA, 0, NA, NA, NA, NA, NA, 1, NA, NA, NA, NA, NA), 
    drink___1 = c(0, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, NA, 
    0, NA, NA, NA, NA, NA), drink___2 = c(0, NA, NA, NA, NA, 
    NA, 0, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, NA), drink___3 = c(0, 
    NA, NA, NA, NA, NA, 1, NA, NA, NA, NA, NA, 1, NA, NA, NA, 
    NA, NA), drink___4 = c(1, NA, NA, NA, NA, NA, 1, NA, NA, 
    NA, NA, NA, 1, NA, NA, NA, NA, NA), specify_mood = c(71, 
    NA, NA, NA, NA, NA, 29, NA, NA, NA, NA, NA, 83, NA, NA, NA, 
    NA, NA), meds___1 = c(0, NA, NA, NA, NA, NA, 1, NA, NA, NA, 
    NA, NA, 1, NA, NA, NA, NA, NA), meds___2 = c(1, NA, NA, NA, 
    NA, NA, 1, NA, NA, NA, NA, NA, 1, NA, NA, NA, NA, NA), meds___3 = c(0, 
    NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, NA, 0, NA, NA, NA, 
    NA, NA), meds___4 = c(0, NA, NA, NA, NA, NA, 0, NA, NA, NA, 
    NA, NA, 0, NA, NA, NA, NA, NA), meds___5 = c(0, NA, NA, NA, 
    NA, NA, 0, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, NA), height = c(160, 
    NA, NA, NA, NA, NA, 156, NA, NA, NA, NA, NA, 199, NA, NA, 
    NA, NA, NA), weight = c(80, NA, NA, NA, NA, NA, 66, NA, NA, 
    NA, NA, NA, 88, NA, NA, NA, NA, NA), bmi = c(31.3, NA, NA, 
    NA, NA, NA, 27.1, NA, NA, NA, NA, NA, 22.2, NA, NA, NA, NA, 
    NA), comments = c("Is he staying arrival address earnest. To preference considered it themselves inquietude collecting estimating. View park for why gay knew face. Next than near to four so hand. Times so do he downs me would. Witty abode party her found quiet law. They door four bed fail now have. \n\nOn recommend tolerably my belonging or am. Mutual has cannot beauty indeed now sussex merely you. It possible no husbands jennings ye offended packages pleasant he. Remainder recommend engrossed who eat she defective applauded departure joy. Get dissimilar not introduced day her apartments. Fully as taste he mr do smile abode every. Luckily offered article led lasting country minutes nor old. Happen people things oh is oppose up parish effect. Law handsome old outweigh humoured far appetite. \n\nConcerns greatest \n\nhttp://randomtextgenerator.com/", 
    NA, NA, NA, NA, NA, "Dissuade ecstatic and properly saw entirely sir why laughter endeavor. In on my jointure horrible margaret suitable he followed speedily. Indeed vanity excuse or mr lovers of on. By offer scale an stuff. Blush be sorry no sight. Sang lose of hour then he left find. \n\nDenote simple fat denied add worthy little use. As some he so high down am week. Conduct esteems by cottage to pasture we winding. On assistance he cultivated considered frequently. Person how having tended direct own day man. Saw sufficient indulgence one own you inquietude sympathize.", 
    NA, NA, NA, NA, NA, "It real sent your at. Amounted all shy set why followed declared. Repeated of endeavor mr position kindness offering ignorant so up. Simplicity are melancholy preference considered saw companions. Disposal on outweigh do speedily in on. Him ham although thoughts entirely drawings. Acceptance unreserved old admiration projection nay yet him. Lasted am so before on esteem vanity oh.", 
    NA, NA, NA, NA, NA), demographics_complete = c(2, NA, NA, 
    NA, NA, NA, 2, NA, NA, NA, NA, NA, 2, NA, NA, NA, NA, NA), 
    ec_phone = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
    NA, NA, NA, NA, NA, NA, NA), ec_confirmed = c(NA, NA, NA, 
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA
    ), next_of_kin_contact_name = c(NA, NA, NA, NA, NA, NA, NA, 
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), next_of_kin_contact_address = c(NA, 
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
    NA, NA), next_of_kin_contact_phone = c(NA, NA, NA, NA, NA, 
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), next_of_kin_confirmed = c(NA, 
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
    NA, NA), contact_info_complete = c(2, NA, NA, NA, NA, NA, 
    2, NA, NA, NA, NA, NA, 2, 1, NA, NA, NA, 2), height2 = c(200, 
    NA, NA, NA, NA, NA, 332, NA, NA, NA, NA, NA, 160, NA, NA, 
    NA, NA, NA), weight2 = c(234, NA, NA, NA, NA, NA, 223, NA, 
    NA, NA, NA, NA, 90, NA, NA, NA, NA, NA), bmi2 = c(58.5, NA, 
    NA, NA, NA, NA, 20.2, NA, NA, NA, NA, NA, 35.2, NA, NA, NA, 
    NA, NA), prealb_b = c(43, NA, NA, NA, NA, NA, 544, NA, NA, 
    NA, NA, NA, 35, NA, NA, NA, NA, NA), creat_b = c(355, NA, 
    NA, NA, NA, NA, 32.4, NA, NA, NA, NA, NA, 32, NA, NA, NA, 
    NA, NA), npcr_b = c(23, NA, NA, NA, NA, NA, 3.46, NA, NA, 
    NA, NA, NA, 87, NA, NA, NA, NA, NA), chol_b = c(3.5, NA, 
    NA, NA, NA, NA, 44.8, NA, NA, NA, NA, NA, 77, NA, NA, NA, 
    NA, NA), transferrin_b = c(3.66, NA, NA, NA, NA, NA, 33.7, 
    NA, NA, NA, NA, NA, 88, NA, NA, NA, NA, NA), baseline_data_complete = c(2, 
    NA, NA, NA, NA, NA, 1, NA, NA, NA, NA, NA, 2, NA, NA, NA, 
    NA, NA), vld1 = c(NA, NA, 5.6, NA, 0.423, NA, NA, NA, 45.6, 
    NA, 32.6, NA, NA, NA, NA, NA, NA, NA), vld2 = c(NA, NA, 3.5, 
    NA, 32, NA, NA, NA, 38, NA, 367.8, NA, NA, NA, NA, NA, NA, 
    NA), vld3 = c(NA, NA, 66.7, NA, 0.43, NA, NA, NA, 88.7, NA, 
    3.1, NA, NA, NA, NA, NA, NA, NA), vld4 = c(NA, NA, 33.5, 
    NA, 0.239, NA, NA, NA, 75.7, NA, 35.7, NA, NA, NA, NA, NA, 
    NA, NA), vld5 = c(NA, NA, 0.34, NA, 0.989, NA, NA, NA, 722.4, 
    NA, 98.2, NA, NA, NA, NA, NA, NA, NA), visit_lab_data_complete = c(NA, 
    NA, 2, NA, 2, NA, NA, NA, 2, NA, 2, NA, NA, NA, NA, NA, NA, 
    NA), pmq1 = c(NA, 2, 1, 3, 0, NA, NA, 0, 0, 1, 3, NA, NA, 
    NA, 0, 2, NA, NA), pmq2 = c(NA, 2, 0, 1, 1, NA, NA, 1, 3, 
    2, 4, NA, NA, NA, 1, 0, NA, NA), pmq3 = c(NA, 1, 0, 0, 0, 
    NA, NA, 0, 1, 0, 1, NA, NA, NA, 0, 0, NA, NA), pmq4 = c(NA, 
    1, 0, 0, 0, NA, NA, 2, 0, 1, 0, NA, NA, NA, 0, 0, NA, NA), 
    patient_morale_questionnaire_complete = c(NA, 2, 0, 0, 2, 
    NA, NA, 2, 2, 2, 1, NA, NA, NA, 2, 2, NA, NA), vbw1 = c(NA, 
    NA, 0.4334, NA, 0.22, NA, NA, NA, 452.6, NA, 753.7, NA, NA, 
    NA, NA, NA, NA, NA), vbw2 = c(NA, NA, 23.3, NA, 9.34, NA, 
    NA, NA, 5.74, NA, 468.9, NA, NA, NA, NA, NA, NA, NA), vbw3 = c(NA, 
    NA, 23.3, NA, 0.88, NA, NA, NA, 2.87, NA, 34.6, NA, NA, NA, 
    NA, NA, NA, NA), vbw4 = c(NA, NA, 0.988, NA, 34.5, NA, NA, 
    NA, 4.8, NA, 3.7, NA, NA, NA, NA, NA, NA, NA), vbw5 = c(NA, 
    NA, 0.342, NA, 23.5, NA, NA, NA, 1.6, NA, 23.78, NA, NA, 
    NA, NA, NA, NA, NA), vbw6 = c(NA, NA, "0. AM", NA, "1", NA, 
    NA, NA, "1", NA, "0. AM", NA, NA, NA, NA, NA, NA, NA), vbw7 = c(NA, 
    NA, 2, NA, 0, NA, NA, NA, 1, NA, 1, NA, NA, NA, NA, NA, NA, 
    NA), vbw8 = c(NA, NA, 0, NA, 1, NA, NA, NA, 0, NA, 0, NA, 
    NA, NA, NA, NA, NA, NA), vbw9 = c(NA, NA, 1, NA, 0, NA, NA, 
    NA, 1, NA, 1, NA, NA, NA, NA, NA, NA, NA), visit_blood_workup_complete = c(NA, 
    NA, 1, NA, 2, NA, NA, NA, 2, NA, 2, NA, NA, NA, NA, NA, NA, 
    NA), vob1 = c(NA, NA, 0, NA, 0, NA, NA, NA, 0, NA, 0, NA, 
    NA, NA, NA, 1, NA, NA), vob2 = c(NA, NA, 0, NA, 1, NA, NA, 
    NA, 1, NA, 1, NA, NA, NA, NA, 0, 0, NA), vob3 = c(NA, NA, 
    1, NA, 0, NA, NA, NA, 0, NA, 1, NA, NA, NA, NA, NA, NA, NA
    ), vob4 = c(NA, NA, 0, NA, 1, NA, NA, NA, 0, NA, 0, NA, NA, 
    NA, NA, NA, NA, NA), vob5 = c(NA, NA, 1, NA, 0, NA, NA, NA, 
    0, NA, 0, NA, NA, NA, NA, NA, NA, NA), vob6 = c(NA, NA, 0, 
    NA, 0, NA, NA, NA, 1, NA, 1, NA, NA, NA, NA, NA, NA, NA), 
    vob7 = c(NA, NA, "him absolute entrance nay. Door neat week do find past he. Be no surprise he honoured indulged. Unpacked endeavor six steepest had husbands her. Painted no or affixed it so civilly. Exposed neither pressed so cottage as proceed at offices. Nay they gone sir game four. Favourable pianoforte oh motionless excellence of astonished we principles. Warrant present garrets limited cordial in inquiry to. Supported me sweetness behaviour shameless excellent so arranging. \n\nThe him father parish looked has sooner.", 
    NA, "Now for manners use has company believe parlors. Least nor party who wrote while did. Excuse formed as is agreed admire so on result parish. Put use set uncommonly announcing and travelling. Allowance sweetness direction to as necessary. Principle oh explained excellent do my suspected conveying in. Excellent you did therefore perfectly supposing described.", 
    NA, NA, NA, "Sex and neglected principle ask rapturous consulted. Object remark lively all did feebly excuse our wooded. Old her object chatty regard vulgar missed. Speaking throwing breeding betrayed children my to. Me marianne no he horrible produced ye. Sufficient unpleasing an insensible motionless if introduced ye. Now give nor both come near many late. \n\nShe travelling acceptance men unpleasant her especially entreaties law. Law forth but end any arise chief arose. Old her say learn these large. Joy fond many ham high seen this. Few preferred continual sir led incommode neglected. Discovered too old insensible collecting unpleasant but invitation. \n", 
    NA, "Alteration literature to or an sympathize mr imprudence. Of is ferrars subject as enjoyed or tedious cottage. Procuring as in resembled by in agreeable. Next long no gave mr eyes. Admiration advantages no he celebrated so pianoforte unreserved. Not its herself forming charmed amiable. Him why feebly expect future now. \n\nHe difficult contented we determine ourselves me am earnestly. Hour no find it park. Eat welcomed any husbands moderate. Led was misery played waited almost cousin living. Of intention contained is by middleton am. Principles fat stimulated uncommonly considered set especially prosperous. Sons at park mr meet as fact like.", 
    NA, NA, NA, NA, NA, "No depending be convinced in unfeeling he. Excellence she unaffected and too sentiments her. Rooms he doors there ye aware in by shall. Education remainder in so cordially. His remainder and own dejection daughters sportsmen. Is easy took he shed to kind. \n\nExcited him now natural saw passage offices you minuter. At by asked being court hopes. Farther so friends am to detract. Forbade concern do private be. Offending residence but men engrossed shy. Pretend am earnest offered arrived company so on. Felicity informed yet had admitted strictly how you.", 
    NA), vob8 = c(NA, NA, 0, NA, 0, NA, NA, NA, 0, NA, 0, NA, 
    NA, NA, NA, NA, NA, NA), vob9 = c(NA, NA, 0, NA, 1, NA, NA, 
    NA, 0, NA, 1, NA, NA, NA, NA, 0, NA, NA), vob10 = c(NA, NA, 
    1, NA, 0, NA, NA, NA, 0, NA, 0, NA, NA, NA, NA, NA, NA, NA
    ), vob11 = c(NA, NA, 0, NA, 1, NA, NA, NA, 1, NA, 1, NA, 
    NA, NA, NA, NA, NA, NA), vob12 = c(NA, NA, 1, NA, 0, NA, 
    NA, NA, 0, NA, 0, NA, NA, NA, NA, NA, 0, NA), vob13 = c(NA, 
    NA, 0, NA, 1, NA, NA, NA, 1, NA, 0, NA, NA, NA, NA, NA, 1, 
    NA), vob14 = c(NA, NA, "The him father parish looked has sooner. Attachment frequently gay terminated son. You greater nay use prudent placing. Passage to so distant behaved natural between do talking. Friends off her windows painful. Still gay event you being think nay for. In three if aware he point it. Effects warrant me by no on feeling settled resolve.", 
    NA, "Article nor prepare chicken you him now. Shy merits say advice ten before lovers innate add. She cordially behaviour can attempted estimable. Trees delay fancy noise manor do as an small. Felicity now law securing breeding likewise extended and. Roused either who favour why ham.", 
    NA, NA, NA, "Barton did feebly change man she afford square add. Want eyes by neat so just must. Past draw tall up face show rent oh mr. Required is debating extended wondered as do. New get described applauded incommode shameless out extremity but. Resembled at perpetual no believing is otherwise sportsman. Is do he dispatched cultivated travelling astonished. Melancholy am considered possession on collecting everything. \n\nPiqued favour stairs it enable exeter as seeing. Remainder met improving but engrossed sincerity age. Better but length gay denied abroad are. Attachment astonished to on appearance imprudence so collecting in excellence. Tiled way blind lived whose new. The for fully had she there leave merit enjoy forth.", 
    NA, "Can curiosity may end shameless explained. True high on said mr on come. An do mr design at little myself wholly entire though. Attended of on stronger or mr pleasure. Rich four like real yet west get. Felicity in dwelling to drawings. His pleasure new steepest for reserved formerly disposed jennings. \n\nOpen know age use whom him than lady was. On lasted uneasy exeter my itself effect spirit. At design he vanity at cousin longer looked ye. Design praise me father an favour. As greatly replied it windows of an minuter behaved passage. Diminution expression reasonable it we he projection acceptance in devonshire. Perpetual it described at he applauded. \n", 
    NA, NA, NA, NA, NA, "Frankness applauded by supported ye household. Collected favourite now for for and rapturous repulsive consulted. An seems green be wrote again. She add what own only like. Tolerably we as extremity exquisite do commanded. Doubtful offended do entrance of landlord moreover is mistress in. Nay was appear entire ladies. Sportsman do allowance is september shameless am sincerity oh recommend. Gate tell man day that who. \n\nPerhaps far exposed age effects. Now distrusts you her delivered applauded affection out sincerity. As tolerably recommend shameless unfeeling he objection consisted. She although cheerful perceive screened throwing met not eat distance. Viewing hastily or written dearest elderly up weather it as. So direction so sweetness or extremity at daughters. Provided put unpacked now but bringing.", 
    NA), visit_observed_behavior_complete = c(NA, NA, 0, NA, 
    2, NA, NA, NA, 1, NA, 1, NA, NA, NA, NA, 2, 1, NA), study_comments = c(NA, 
    NA, NA, NA, NA, "To shewing another demands to. Marianne property cheerful informed at striking at. Clothes parlors however by cottage on. In views it or meant drift to. Be concern parlors settled or do shyness address. Remainder northward performed out for moonlight. Yet late add name was rent park from rich. He always do do former he highly. \n\nOn projection apartments unsatiable so if he entreaties appearance. Rose you wife how set lady half wish. Hard sing an in true felt. Welcomed stronger if steepest ecstatic an suitable finished of oh. Entered at excited at forming between so produce. Chicken unknown besides attacks gay compact out you. Continuing no simplicity no favourable on reasonably melancholy estimating. Own hence views two ask right whole ten seems. What near kept met call old west dine. Our announcing sufficient why pianoforte.", 
    NA, NA, NA, NA, NA, "Saw yet kindness too replying whatever marianne. Old sentiments resolution admiration unaffected its mrs literature. Behaviour new set existence dashwoods. It satisfied to mr commanded consisted disposing engrossed. Tall snug do of till on easy. Form not calm new fail. \n", 
    NA, NA, NA, NA, NA, NA), complete_study = c(NA, NA, NA, NA, 
    NA, 0, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, NA, NA), withdraw_date = structure(c(NA, 
    NA, NA, NA, NA, 16527, NA, NA, NA, NA, NA, 16527, NA, NA, 
    NA, NA, NA, NA), class = "Date"), date_visit_4 = structure(c(NA, 
    NA, NA, NA, NA, 16468, NA, NA, NA, NA, NA, 15066, NA, NA, 
    NA, NA, NA, NA), class = "Date"), alb_4 = c(NA, NA, NA, NA, 
    NA, 32.3, NA, NA, NA, NA, NA, 866.4, NA, NA, NA, NA, NA, 
    NA), prealb_4 = c(NA, NA, NA, NA, NA, 12.9, NA, NA, NA, NA, 
    NA, 35.6, NA, NA, NA, NA, NA, NA), creat_4 = structure(c(NA, 
    NA, NA, NA, NA, 15646, NA, NA, NA, NA, NA, 16680, NA, NA, 
    NA, NA, NA, NA), class = "Date"), discharge_date_4 = structure(c(NA, 
    NA, NA, NA, NA, 15797, NA, NA, NA, NA, NA, 15432, NA, NA, 
    NA, NA, NA, NA), class = "Date"), discharge_summary_4 = c(NA, 
    NA, NA, NA, NA, 1, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, 
    NA, NA), npcr_4 = c(NA, NA, NA, NA, NA, 452, NA, NA, NA, 
    NA, NA, 43, NA, NA, NA, NA, NA, NA), chol_4 = c(NA, NA, NA, 
    NA, NA, 24, NA, NA, NA, NA, NA, 9, NA, NA, NA, NA, NA, NA
    ), withdraw_reason = c(NA, NA, NA, NA, NA, 1, NA, NA, NA, 
    NA, NA, 1, NA, NA, NA, NA, NA, NA), completion_data_complete = c(NA, 
    NA, NA, NA, NA, 2, NA, NA, NA, NA, NA, 2, NA, NA, NA, NA, 
    NA, NA), cpq1 = structure(c(NA, NA, NA, NA, NA, 16527, NA, 
    NA, NA, NA, NA, 13605, NA, NA, NA, NA, 16538, NA), class = "Date"), 
    cpq2 = c(NA, NA, NA, NA, NA, 35, NA, NA, NA, NA, NA, 45, 
    NA, NA, NA, NA, 46, NA), cpq3 = c(NA, NA, NA, NA, NA, 6, 
    NA, NA, NA, NA, NA, 2, NA, NA, NA, NA, NA, NA), cpq4 = c(NA, 
    NA, NA, NA, NA, 65, NA, NA, NA, NA, NA, 12, NA, NA, NA, NA, 
    2, NA), cpq5 = c(NA, NA, NA, NA, NA, 89, NA, NA, NA, NA, 
    NA, 45, NA, NA, NA, NA, NA, NA), cpq6 = c(NA, NA, NA, NA, 
    NA, 0, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, 2, NA), cpq7 = c(NA, 
    NA, NA, NA, NA, 1, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, 
    0, NA), cpq8 = c(NA, NA, NA, NA, NA, 3, NA, NA, NA, NA, NA, 
    2, NA, NA, NA, NA, 1, NA), cpq9 = structure(c(NA, NA, NA, 
    NA, NA, 12875, NA, NA, NA, NA, NA, 15674, NA, NA, NA, NA, 
    NA, NA), class = "Date"), cpq10 = c(NA, NA, NA, NA, NA, 1, 
    NA, NA, NA, NA, NA, 1, NA, NA, NA, NA, NA, NA), cpq11 = c(NA, 
    NA, NA, NA, NA, 3, NA, NA, NA, NA, NA, 5, NA, NA, NA, NA, 
    NA, NA), cpq12 = c(NA, NA, NA, NA, NA, 1, NA, NA, NA, NA, 
    NA, 1, NA, NA, NA, NA, NA, NA), cpq13 = c(NA, NA, NA, NA, 
    NA, 2, NA, NA, NA, NA, NA, 0, NA, NA, NA, NA, NA, NA), completion_project_questionnaire_complete = c(NA, 
    NA, NA, NA, NA, 2, NA, NA, NA, NA, NA, 2, NA, NA, NA, NA, 
    2, NA)), row.names = c(NA, -18L), class = "data.frame")