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
