Possuo um data frame onde em cada coluna é o valor de eventos no período, preciso calcular o incremente e o decremento desses períodos para uma base maior e não consegui fazer:
p1<- rep(2:11)
p2<- rep(3:12)
p3<- rep(1:10)
p4<- rep(4:13)
base<- cbind(p1,p2,p3,p4)
base
p1 p2 p3 p4
[1,] 2 3 1 4
[2,] 3 4 2 5
[3,] 4 5 3 6
[4,] 5 6 4 7
[5,] 6 7 5 8
[6,] 7 8 6 9
[7,] 8 9 7 10
[8,] 9 10 8 11
[9,] 10 11 9 12
[10,] 11 12 10 13
esperado:
p1 p2 p3 p4 in dc
[1,] 2 3 1 4 2 1
[2,] 3 4 2 5 2 1
[3,] 4 5 3 6 2 1
[4,] 5 6 4 7 2 1
[5,] 6 7 5 8 2 1
[6,] 7 8 6 9 2 1
[7,] 8 9 7 10 2 1
[8,] 9 10 8 11 2 1
[9,] 10 11 9 12 2 1
[10,] 11 12 10 13 2 1
Ou seja, tomando como exemplo a linha 9:
[9,] 10 11 9 12 2 1
comparando o p2 com o p1 houve um incremento (10 > 11) para o período 3 houve um decremento (11 > 9) para o período 4 houve outro incremento (9 > 12) totalizando 2 incrementos e um decremento.
A ideia é executar isso para um conjunto de 500 variáveis visualizadas em 10 períodos.
10 11 11 12
, qual deveria ser o resultado?10 11 11 12 2 0
? Ou algo diferente?