我想按 ID 分組并進行匯總，同時洗掉 NA。請參閱下面的示例代碼。
# Example data
ID <- c(1, 1, 1, 2, 2, 3, 3)
x <- c(2, 3, NA, 2, 3, 1, 1)
ID_x <- tibble(ID, x)
# 1. Works
ID_x %>%
group_by(ID) %>%
summarise_each(mean)
# 2. Does not work with na.rm=TRUE
ID_x %>%
group_by(ID) %>%
summarise_each(mean(., na.rm=TRUE))
提前致謝
uj5u.com熱心網友回復：
使用 lambda (~
library(dplyr)
ID_x %>%
group_by(ID) %>%
summarise_each(~ mean(., na.rm=TRUE))
-輸出
# A tibble: 3 × 2
ID x
<dbl> <dbl>
1 1 2.5
2 2 2.5
3 3 1
此外，在最近的版本中，summarise_each將伴隨警告，因為這些已被棄用，有利于across
ID_x %>%
group_by(ID) %>%
summarise(across(everything(), ~ mean(., na.rm=TRUE)))
uj5u.com熱心網友回復：
另一種選擇是使用funs. 你也可以使用這個：
ID_x %>%
group_by(ID) %>%
summarise_each(funs(mean(., na.rm = TRUE)))
輸出：
# A tibble: 3 × 2
ID x
<dbl> <dbl>
1 1 2.5
2 2 2.5
3 3 1
轉載請註明出處，本文鏈接：https://www.uj5u.com/yidong/462265.html
上一篇：根據其他列向我的資料框添加一列
下一篇：如何從R中的父函式訪問變數