Пример данных
Вы не сообщили нам, как выглядят ваши необработанные данные, поэтому я предполагаю, что они находятся во фрейме данных следующим образом:
(my_data <- data.frame(id = rep(1:3, c(3, 1, 1)),
has.bank.account = rep(c("yes", "no"), c(4, 1)),
nr.of.accounts = rep(c(3, 6, NA), c(3, 1, 1)),
amount = c(1000 * 1:3, 10000, NA)))
# id has.bank.account nr.of.accounts amount
# 1 1 yes 3 1000
# 2 1 yes 3 2000
# 3 1 yes 3 3000
# 4 2 yes 6 10000
# 5 3 no NA NA
Код
Затем вы можете использовать ifelse
для создания новой переменной:
with(my_data,
ifelse(has.bank.account == "no",
"no",
paste0("Yes ",
ifelse(nr.of.accounts > 5, ">5_", "<=5_"),
amount
)
)
)
# [1] "Yes <=5_1000" "Yes <=5_2000" "Yes <=5_3000" "Yes >5_10000" "no"