mnoetel / READI-SCRUB

For READI SCRUB project cleaning code and dashboard
Creative Commons Zero v1.0 Universal
1 stars 1 forks source link

Wave 2 manipulation checks differ between ORU and MASTER #24

Open aksaeri opened 4 years ago

aksaeri commented 4 years ago

image

For some reason the two manipulation checks differ beween ORU and MASTER recruitment.

This has implications for the manipulation checking code in cleaning, see

d$manip_check_info <- grepl("tracking", d$manipulation_check)
d$manip_check_safe <- grepl("protected", d$manipulation_check)
d$manip_check_no_safe <- grepl("long-term", d$manipulation_check)
d$manip_check_aut <- grepl("activate", d$manipulation_check)
d$manip_check_cont <- grepl("must", d$manipulation_check)

...

d$autonomy_manip_check_passed <- (d$aut_int & d$manip_check_aut & !d$manip_check_cont) |
  (!d$aut_int & !d$manip_check_aut & d$manip_check_cont)

d$safety_manip_check_passed <- (d$safe_int & d$manip_check_safe & !d$manip_check_no_safe) |
  (!d$safe_int & !d$manip_check_safe & d$manip_check_no_safe) 

d$intentions_total <- d$intentions_download + d$intentions_share + d$intentions_share

manip_check_items <- grepl("manip_check", names(d))
d[d$wave != 2, manip_check_items] <- NA

Note that with the new checkboxes, the manip check items in the image above have been renamed to manipulationcheck[1-5].