R 中 dplyr 中的“添加缺失的分组变量”消息

我的脚本的一部分以前运行良好，但最近生成了一个奇怪的语句，之后我的许多其他函数都无法正常工作。我试图在每个站点的值排名列表中选择第 8 个和第 23 个位置，以查找每个站点 30 年来每年每天的第 25 个和第 75 个百分位值。我的方法如下（适用于四行数据集 - 通常对于我的完整 30 年数据集，切片（3）将是切片（23））：

library(“dplyr”)

mydata <- data.frame(
  station_number = factor(rep("01AD002", 4L)),
  year = 1981:1984,
  month = rep(1L, 4L),
  day = rep(1L, 4L),
  value = c(113, 8.329999924, 15.60000038, 149)
)

以前，我会留下一张表，其中每个站点都有一个值来描述第 25 个百分位（因为排列函数似乎将它们从高到低排序）。但是，现在当我运行这些行时，我收到一条消息：

Adding missing grouping variables: `month`, `day`, `station_number`

此消息对我来说没有意义，因为分组变量清楚地存在于我的表中。另外，直到最近，这一切都运行良好。我努力了：

• detach(“plyr”) – 因为我在 dplyr 之前加载了它
• dplyr:: group_by – 将其直接放在 group_by 行中
• 卸载并重新安装 dplyr，尽管这是我遇到的另一个问题

知道为什么我可能会收到此消息以及为什么它可能停止工作吗？

谢谢你的帮助。

更新：添加了一个站点的 dput 示例，但多年来的值均为 1 月 1 日。希望一旦分组就返回位置值，例如 slice(3) 希望返回这个较小子集的 15.6 值。

为了保持一致性，分组变量在早期定义时应始终存在，因此在以下情况下添加：select(value)被执行。ungroup应该解决它：

qu25 <- mydata %>% 
  group_by(month, day, station_number) %>%
  arrange(desc(value)) %>% 
  slice(2) %>% 
  ungroup() %>%
  select(value)

请求的结果没有警告：

> mydata %>% 
+   group_by(month, day, station_number) %>%
+   arrange(desc(value)) %>% 
+   slice(2) %>% 
+   ungroup() %>%
+   select(value)
# A tibble: 1 x 1
  value
  <dbl>
1   113