Заменить значение во всех столбцах, кроме последнего

Question

У меня есть этот раздел для замены значения 99 во всех столбцах на NA.Но я не хочу, чтобы колонка respondent_id была произведена.

SOURCE_SUBSET[SOURCE_SUBSET==99] <- NA

Answer 1

cols <- names(SOURCE_SUBSET)[which(!(names(SOURCE_SUBSET) %in% "respondent_id"))]

for(i in cols){
  SOURCE_SUBSET[SOURCE_SUBSET[, i] == 99, i] <- NA
}