Como calcular uma soma acumulada usando dplyr


Você pode usar os seguintes métodos para calcular a soma acumulada de uma coluna em R usando o pacote dplyr :

Método 1: Calcular a soma cumulativa de uma coluna

 df %>% mutate(cum_sum = cumsum(var1))

Método 2: calcular a soma acumulada por grupo

 df %>% group_by(var1) %>% mutate(cum_sum = cumsum(var2))

Os exemplos a seguir mostram como usar cada método na prática.

Exemplo 1: Calcule a soma cumulativa usando dplyr

Suponha que temos o seguinte quadro de dados em R:

 #create dataset
df <- data. frame (day=c(1, 2, 3, 4, 5, 6, 7, 8),
                 sales=c(7, 12, 10, 9, 9, 11, 18, 23))

#view dataset
df

  day sales
1 1 7
2 2 12
3 3 10
4 4 9
5 5 9
6 6 11
7 7 18
8 8 23

Podemos usar o código a seguir para criar uma nova coluna contendo a soma acumulada dos valores da coluna “vendas”:

 library (dplyr)

#calculate cumulative sum of sales
df %>% mutate(cum_sales = cumsum(sales))

  day sales cum_sales
1 1 7 7
2 2 12 19
3 3 10 29
4 4 9 38
5 5 9 47
6 6 11 58
7 7 18 76
8 8 23 99

Exemplo 2: Calcule a soma cumulativa por grupo usando dplyr

Suponha que temos o seguinte quadro de dados em R:

 #create dataset
df <- data. frame (store=c('A', 'A', 'A', 'A', 'B', 'B', 'B', 'B'),
                 day=c(1, 2, 3, 4, 1, 2, 3, 4),
                 sales=c(7, 12, 10, 9, 9, 11, 18, 23))

#view dataset
df

  store day sales
1 To 1 7
2 to 2 12
3 to 3 10
4 to 4 9
5 B 1 9
6 B 2 11
7 B 3 18
8 B 4 23

Podemos utilizar o código a seguir para criar uma nova coluna contendo a soma acumulada dos valores da coluna “vendas”, agrupados pela coluna “loja”:

 library (dplyr)

#calculate cumulative sum of sales by store
df %>% group_by(store) %>% mutate(cum_sales = cumsum(sales))

# A tibble: 8 x 4
# Groups: store[2]
  store day sales cum_sales   
1 To 1 7 7
2 A 2 12 19
3 To 3 10 29
4 A 4 9 38
5 B 1 9 9
6 B 2 11 20
7 B 3 18 38
8 B 4 23 61

Recursos adicionais

Os tutoriais a seguir explicam como realizar outros cálculos comuns em R:

Como calcular soma por grupo em R
Como calcular a média por grupo em R

Add a Comment

O seu endereço de email não será publicado. Campos obrigatórios marcados com *