获取tall dataset中分组值之间的差异

Question

我设置了一个数据，如下所示：

Name     df Value
A         1   .5
A         2    2
A         3    3
B         1    1
B         2    .5

我希望得到值之间的差异，直到Name列更改，然后我希望它停止并开始获得新的差异。如下所示：

Name     df Value   Diff
A         1   .5      NA
A         2    2      1.5
A         3    3      2.5
B         1    1       NA
B         2    .5     -.5

有什么办法我能做到吗？我尝试过将数据集设置为宽格式，但我也想不出一种方法来使其工作。

Answer 1

一种选择是通过diff完成一个组

library(dplyr)
df1 %>%
   group_by(Name) %>%
    mutate(Diff = c(NA, cumsum(diff(Value))))
# A tibble: 5 x 4
# Groups:   Name [2]
#  Name     df Value  Diff
#  <chr> <int> <dbl> <dbl>
#1 A         1   0.5  NA  
#2 A         2   2     1.5
#3 A         3   3     2.5
#4 B         1   1    NA  
#5 B         2   0.5  -0.5

数据

df1 <- structure(list(Name = c("A", "A", "A", "B", "B"), df = c(1L, 
2L, 3L, 1L, 2L), Value = c(0.5, 2, 3, 1, 0.5)), 
   class = "data.frame", row.names = c(NA, 
-5L))

Answer 2

@akrun答案是可行的，但就像一个谜语一样，这也是可行的：

df1 %>% 
  group_by(Name) %>% 
  mutate(Diff = cumsum(Value - lag(Value, default = Value[1])))

# # A tibble: 5 x 4
# # Groups:   Name [2]
#   Name     df Value  Diff
#   <chr> <int> <dbl> <dbl>
# 1 A         1   0.5   0  
# 2 A         2   2     1.5
# 3 A         3   3     2.5
# 4 B         1   1     0  
# 5 B         2   0.5  -0.5