Map character response values like "PR" or "SD" to numeric values.
Value
1ifargequals"CR",2ifargequals"PR",3ifargequals"SD",4ifargequals"NON-CR/NON-PD",5ifargequals"PD",6ifargequals"NE",7ifargequals"MISSING",NA_real_otherwise
Examples
aval_resp(c("CR", "PR", "SD", "NON-CR/NON-PD", "PD", "NE", "MISSING", "ND", NA_character_))
#> [1] 1 2 3 4 5 6 7 NA NA
