Bilanzberechnung unter Verwendung Wert der vorhergehenden Zeile

Question

Tabelle I haben:

DT <- data.frame(A=1:5*10, B=1:5*-1) 
DT 
    A B 
1 10 -1 
2 20 -2 
3 30 -3 
4 40 -4 
5 50 -5 

Tabelle I will:

C = A + B + C (n-1)

A B C 
1 10 -1 9 
2 20 -2 27 
3 30 -3 54 
4 40 -4 90 
5 50 -5 135 

I habe einen Verweis unter dem Link und versuche, ihn anzuwenden, aber scheiterte:

Use a value from the previous row in an R data.table calculation

DT$C<-DT$A+DT$B+shift(DT$C) 

Answer 1

Wenn ich nicht etwas fehlt, wird dies den Trick:

DT <- data.table(A=1:5*10, B=1:5*-1) 
DT[, C := cumsum(A + B)] 

Answer 2

Mit dplyr

library(dplyr) 
DT %>% 
    mutate(C= cumsum(A+B)) 
# A B C 
#1 10 -1 9 
#2 20 -2 27 
#3 30 -3 54 
#4 40 -4 90 
#5 50 -5 135