Редактировать уровни сразу нескольких столбцов в R

Question

Я пытаюсь установить уровни нескольких столбцов факторов следующим значениям «Нет» и «Да». Я использую следующий код, но он не работает

binaryCol <- c(5:10, 15:19, 21:26, 30:32) # position of the columns for which I want to change the factors 
for(i in binaryCol) {levels(df[,i])<- c("No","Yes")} 

Любая помощь будет оценена

Answer 1

Ваш код прекрасно работает на простом примере:

binaryCol <- c(1,3) 
df <- data.frame(Var1=factor(1:0), Var2=1:2, Var3=factor(0:1)) 
# Var1 Var2 Var3 
#1 1 1 0 
#2 0 2 1 

for(i in binaryCol) { levels(df[,i]) <- c("No","Yes") } 
df 
# Var1 Var2 Var3 
#1 Yes 1 No 
#2 No 2 Yes 

В качестве альтернативы, используйте lapply применять функция для ваших выбранных столбцов factor:

df[binaryCol] <- lapply(df[binaryCol], function(x) {levels(x) <- c("No","Yes"); x }) 

df 
# Var1 Var2 Var3 
#1 Yes 1 No 
#2 No 2 Yes 

Или, если вы хотите быть хитрым:

df[binaryCol] <- lapply(df[binaryCol], `levels<-`, c("No","Yes"))