ミューテーションが条件付きの場合(特定の列の値に応じて)、ミューテートを使用できますか?
この例は、私が何を意味するかを示すのに役立ちます。
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
新しい列gを作成するために、dplyrパッケージを使用して問題の解決策を見つけることを望んでいました(そうです、これは機能するはずのコードではありませんが、目的を明確にしていると思います)。
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
、