Thông báo "Thêm các biến nhóm bị thiếu" trong dplyr trong R

Question

Tôi có một phần của tập lệnh đã hoạt động tốt trước đây, nhưng gần đây đã tạo ra một câu lệnh kỳ lạ sau nhiều chức năng khác của tôi không hoạt động chính xác. Tôi đang cố gắng chọn vị trí thứ 8 và thứ 23 trong danh sách xếp hạng các giá trị cho mỗi trang web để tìm giá trị phần trăm 25 và 75 cho mỗi ngày trong một năm cho mỗi trang web trong 30 năm. Cách tiếp cận của tôi là như sau (điều chỉnh cho bốn dòng dữ liệu - lát (3) sẽ được lát (23) cho toàn bộ dữ liệu 30 năm tôi thường):

library(“dplyr”) 

mydata 

structure(list(station_number = structure(c(1L, 1L, 1L, 1L), .Label = "01AD002", class = "factor"), 
year = 1981:1984, month = c(1L, 1L, 1L, 1L), day = c(1L, 
1L, 1L, 1L), value = c(113, 8.329999924, 15.60000038, 149 
)), .Names = c("station_number", "year", "month", "day", "value"), class = "data.frame", row.names = c(NA, -4L))  

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

Trước đây, tôi sẽ bị bỏ lại với một bảng mà có một giá trị trên mỗi trang web để mô tả phần trăm thứ 25 (vì hàm sắp xếp dường như đặt chúng cao nhất đến thấp nhất). Tuy nhiên, bây giờ khi tôi chạy các dòng này, tôi nhận được thông báo:

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

Thông báo này không có ý nghĩa với tôi vì các biến nhóm rõ ràng có trong bảng của tôi. Ngoài ra, một lần nữa, điều này đã làm việc tốt cho đến gần đây. Tôi đã thử:

• detatch (“plyr”) - kể từ khi tôi có nó nạp trước dplyr
• dplyr :: group_by - đặt này trực tiếp trong dòng group_by
• gỡ cài đặt và tái intstalling dplyr, mặc dù đây là một vấn đề khác mà tôi đã gặp phải

Bất kỳ ý tưởng nào tại sao tôi có thể nhận được thông báo này và tại sao nó có thể ngừng hoạt động?

Cảm ơn bạn đã được trợ giúp.

Cập nhật: Thêm ví dụ về dput với một trang web, nhưng giá trị cho ngày 1 tháng 1 trong nhiều năm. Hy vọng sẽ là giá trị vị trí được trả về một khi được nhóm lại, ví dụ slice (3) hy vọng sẽ trả về giá trị 15.6 cho tập con nhỏ hơn này.

Answer 1

Vì tính nhất quán, các biến nhóm phải luôn có mặt khi được xác định trước đó và do đó được thêm khi select(value) được thực thi. ungroup nên giải quyết nó:

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

Kết quả yêu cầu là không có cảnh báo:

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

Answer 2

Bạn có cập nhật dplyr thời gian gần đây một cách tình cờ? Tôi tự hỏi liệu lệnh gọi dplyr :: arrang của bạn có bị ảnh hưởng bất lợi hay không bởi https://blog.rstudio.org/2016/06/27/dplyr-0-5-0/

Breaking changes arrange() once again ignores grouping, reverting back to the behaviour of dplyr 0.3 and earlier. This makes arrange() inconsistent with other dplyr verbs, but I think this behaviour is generally more useful. Regardless, it’s not going to change again, as more changes will just cause more confusion.