在数据框行中添加列总和

Question

I would like to add the sums of the columns of my dataframe one row at a time.

So for each row, I would like to compute the sum of the columns above it.

Is there an elegant way to do this with a combination of colSums and apply (or sapply, rollapply)? I have been trying a couple of combinations of those, but could not quite figure it out.

Answer 1

new_df <- apply(data_frame, 2, cumsum)

Answer 2

With dplyr , we can do

library(dplyr)
data %>%
      mutate_all(cumsum)