Чи можна використовувати мутацію, коли мутація умовна (залежно від значень певних значень стовпців)?
Цей приклад допомагає показати, що я маю на увазі.
structure(list(a = c(1, 3, 4, 6, 3, 2, 5, 1), b = c(1, 3, 4,
2, 6, 7, 2, 6), c = c(6, 3, 6, 5, 3, 6, 5, 3), d = c(6, 2, 4,
5, 3, 7, 2, 6), e = c(1, 2, 4, 5, 6, 7, 6, 3), f = c(2, 3, 4,
2, 2, 7, 5, 2)), .Names = c("a", "b", "c", "d", "e", "f"), row.names = c(NA,
8L), class = "data.frame")
a b c d e f
1 1 1 6 6 1 2
2 3 3 3 2 2 3
3 4 4 6 4 4 4
4 6 2 5 5 5 2
5 3 6 3 3 6 2
6 2 7 6 7 7 7
7 5 2 5 2 6 5
8 1 6 3 6 3 2
Я сподівався знайти свою проблему за допомогою пакету dplyr (і так, я знаю, що це не код, який повинен працювати, але я думаю, що це робить зрозумілою) для створення нового стовпця g:
library(dplyr)
df <- mutate(df,
if (a == 2 | a == 5 | a == 7 | (a == 1 & b == 4)){g = 2},
if (a == 0 | a == 1 | a == 4 | a == 3 | c == 4) {g = 3})
Результат коду, який я шукаю, повинен мати такий результат у цьому конкретному прикладі:
a b c d e f g
1 1 1 6 6 1 2 3
2 3 3 3 2 2 3 3
3 4 4 6 4 4 4 3
4 6 2 5 5 5 2 NA
5 3 6 3 3 6 2 NA
6 2 7 6 7 7 7 2
7 5 2 5 2 6 5 2
8 1 6 3 6 3 2 3
Хтось має уявлення про те, як це зробити в dplyr? Цей кадр даних - лише приклад, кадри даних, з якими я маю справу, набагато більше. Через його швидкість я намагався використовувати dplyr, але, можливо, є й інші, кращі способи впоратися з цією проблемою?
dplyr::case_when()
набагато ясніше, ніжifelse
,