R和dyplr中的数据帧重新排序(变异)

Question

我有一个像这样的数据框架

Number  Type  Time 
4         B     10
5         B     11
5         B      9
1         B      8
8         R      7
3         R      9
4         R      5
4         R      5

我按类型分组并希望创建一个名为"Adjusted_Time"的新列,其中包含之前的数字时间,最终的Df看起来像这样

Number  Type  Time      Adjusted_Time
4         B     10           8         
5         B     11          10
6         B      9          11
3         B      8          N/A
8         R      7           9          
7         R      9           5
6         R      5           5
5         R      5          N/A

只要没有直接低于该数字的数字,N/A就会去.我现在想用dplyr吧

df %>% group_by(Type) %>% Mutate(Adjusted_Time = ....)

Answer 1

df %>% 
  group_by(Type) %>%
  arrange(Number) %>%
  mutate(Adjusted_Time = lag(Time)) %>%
  arrange(Adjusted_Time)