r语言 - 百分比变化计算-在新列中给出NA值的突变和引导函数

Question

我正在尝试计算数据帧矢量中元素之间的百分比变化:

年

<表类>年数tbody><<tr>201055302201158943201259633201350194

数据集有一些分组，因为类有grouped_df。我们可以在应用代码

之前ungroup

library(dplyr)
atm_per_year %>%
ungroup %>% 
mutate(Pct_change = (Count - lead(Count) / lead(Count)*100))