Как перекодировать переменную символа в R с ошибкой «неожиданного символа»

Question

Я хочу переписать мои данные с символа на числовые. Вот моя неудачная попытка:

library(car) # needed for recode 
survey1$V16a = recode(survey1$V16, "'Very important'=1; 'Fairly important'=2; 'Not very important'=3; 'Not important at all'=4; 'Can't choose'=99;", as.numeric.result=TRUE) 

Это сообщение об ошибке впоследствии я получаю

Ошибка в Recode (survey1 $ V16, « 'Очень важно' = 1; 'Довольно важно' = 2; «Не очень важно» = 3; «Не важно вообще» = 4; «Невозможно выбрать» = 99; »,:

в терминах перекоса:« Невозможно выбрать »= 99 сообщение: Ошибка в parse (text = strsplit (term, "=") [[1]] [1]): : 1: 7: неожиданный символ 1: 'Can not

Answer 1

Для этого не нужно использовать дополнительный пакет, такой как car. Это также делает код менее читаемым, на мой взгляд. Просто используйте ifelse.

survey1$V16a <- ifelse(survey1$V16a == "Very important", 1, 
       ifelse(survey1$V16a == "Fairly important", 2, 
       ifelse(survey1$V16a == "Not very important", 3, 
       ....)))))