如何選擇dplyr組中具有最大值的行？我想用dplyr在每個組中選擇一個具有最大值的行。首先，我生成一些隨機數據來顯示我的問題。set.seed(1)df <- expand.grid(list(A = 1:5, B = 1:5, C = 1:5))df$value <- runif(nrow(df))在plyr中，我可以使用自定義函數來選擇此行。library(plyr)ddply(df, .(A, B), function(x) x[which.max(x$value),])在dplyr中，我使用此代碼獲取最大值，但不是最大值行(本例中為C列)。library(dplyr)df %>% group_by(A, B) %>%
summarise(max = max(value))我怎樣才能做到這一點？謝謝你的建議。sessionInfo()R version 3.1.0 (2014-04-10)Platform: x86_64-w64-mingw32/x64 (64-bit)locale:[1] LC_COLLATE=English_Australia.1252 LC_CTYPE=English_Australia.1252
[3] LC_MONETARY=English_Australia.1252 LC_NUMERIC=C
[5] LC_TIME=English_Australia.1252
attached base packages:[1] stats graphics grDevices utils datasets methods base
other attached packages:[1] dplyr_0.2 plyr_1.8.1
loaded via a namespace (and not attached):[1] assertthat_0.1.0.99 parallel_3.1.0 Rcpp_0.11.1
[4] tools_3.1.0
3 回答
慕絲7291255
TA貢獻1859條經驗 獲得超6個贊
result <- df %>% group_by(A, B) %>% filter(value == max(value)) %>% arrange(A,B,C)
identical( as.data.frame(result), ddply(df, .(A, B), function(x) x[which.max(x$value),]))#[1] TRUE
slice
- 3 回答
- 0 關注
- 1405 瀏覽
添加回答
舉報
0/150
提交
取消