Colocando contagens de ocorrências de valor em linhas em novas variáveis, como fazer isso em R com dplyr?
Eu tenho um grande dataframe (df) que se parece com isso:
structure(list(var1 = c(1, 2, 3, 4, 2, 3, 4, 3, 2), var2 = c(2,
3, 4, 1, 2, 1, 1, 1, 3), var3 = c(4, 4, 2, 3, 3, 1, 1, 1, 4),
var4 = c(2, 2, 2, 2, 3, 2, 3, 4, 1), var5 = c(4, 4, 2, 3,
3, 1, 1, 1, 4)), .Names = c("var1", "var2", "var3", "var4",
"var5"), row.names = c(NA, -9L), class = "data.frame")
var1 var2 var3 var4 var5
1 1 2 4 2 4
2 2 3 4 2 4
3 3 4 2 2 2
4 4 1 3 2 3
5 2 2 3 3 3
6 3 1 1 2 1
7 4 1 1 3 1
8 3 1 1 4 1
9 2 3 4 1 4
Agora preciso contar a ocorrência de valores na linha e criar novas variáveis das contagens. Este deve ser o resultado:
var1 var2 var3 var4 var5 n_1 n_2 n_3 n_4
1 1 2 4 2 4 1 2 0 2
2 2 3 4 2 4 0 2 1 2
3 3 4 2 2 2 0 3 1 1
4 4 1 3 2 3 1 1 2 1
5 2 2 3 3 3 0 2 3 0
6 3 1 1 2 1 3 1 1 0
7 4 1 1 3 1 3 0 1 1
8 3 1 1 4 1 3 0 1 1
9 2 3 4 1 4 1 1 1 2
Como você pode ver, a variável n_1 mostra as contagens de 1, n_2 a contagem de linhas dos 2, etc.
Eu tentei algumas funções dplyr (porque gosto da velocidade delas), mas ainda não consegui. Eu sei que esse é um código definitivamente feio :-), mas minha abordagem seria algo assim:
newdf <- mutate(rowwise(df, n_1 = sum(df==1))
Alguém tem uma idéia de como lidar com esse problema? Muito obrigado antecipadamente!