小编rem*_*emo的帖子

我计算了多个变量均值差异的 Anova F 检验 p 值。现在我想添加“星星”来指示 p 值的显着性水平。我希望 * 表示 10% 水平的显着性，** 表示 5% 水平的显着性，*** 表示 1% 水平的显着性。

我的数据如下所示：

structure(list(Variables = c("A", "B", "C", "D", "E"), 
               `Anova F-Test p-Value` = c(0.05, 5e-04, 0.5, 0.05, 0.01)), 
          class = "data.frame", row.names = c(NA, -5L))

有人可以帮我处理这里的代码吗？

我想从每个组的第一行中减去距离列的每一行。

我的数据如下：

structure(list(Group = c(1L, 1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 
2L, 3L, 3L, 3L, 3L, 3L), Distance = c(0.05, 0.084, 0.06, 0.03, 
0.034, 0.0534, 0.034, 0.23, 0.34, 0.6435, 0.6346, 0.234, 0.246, 
0.4, 0.7)), class = "data.frame", row.names = c(NA, -15L))

我尝试过以下代码：

Data <- Data %>%
  group_by(Group) %>%
  mutate(Difference=Distance - dplyr:: lag(Distance))

但是，如何调整代码，以便对于每个组，从每个组的第一行中的值中减去“距离”列中的值？因此，对于第 1 组，这意味着从 0.05 中减去 0.084、0.06、0.03 和 0.034 的值。