在 || 中禁用函数名称dplyr ||总结
disable function name in across || dplyr || summarise
iris %>% group_by(Species) %>% summarise(across( .cols = is.numeric, .fns = list(Sum = sum), na.rm = TRUE))
我按物种对行进行分组,然后它们将每列的数值相加。
输出如下:
summarise() ungrouping output (override with .groups argument)
Species Sepal.Length_Sum Sepal.Width_Sum Petal.Length_Sum Petal.Width_Sum
<fct> <dbl> <dbl> <dbl> <dbl>
setosa 250. 171. 73.1 12.3
versicolor 297. 138. 213 66.3
virginica 329. 149. 278. 101.
我想删除应用交叉函数后添加的 _Sum。
R 4.0.0
dplyr 1.0.0
在那种情况下我们不需要命名 list
library(dplyr)
iris %>%
group_by(Species) %>%
summarise(across( .cols = is.numeric, .fns = sum, na.rm = TRUE))
或者,如果我们仍想使用命名的 list
,则指定 .names
,这将在添加前缀或后缀以及通过仅指定 [=15 删除任何额外内容方面提供更多控制=]
iris %>%
group_by(Species) %>%
summarise(across( .cols = is.numeric, .fns = list(Sum = sum),
.names = "{col}",na.rm = TRUE))
# A tibble: 3 x 5
# Species Sepal.Length Sepal.Width Petal.Length Petal.Width
# <fct> <dbl> <dbl> <dbl> <dbl>
#1 setosa 250. 171. 73.1 12.3
#2 versicolor 297. 138. 213 66.3
#3 virginica 329. 149. 278. 101.
iris %>% group_by(Species) %>% summarise(across( .cols = is.numeric, .fns = list(Sum = sum), na.rm = TRUE))
我按物种对行进行分组,然后它们将每列的数值相加。
输出如下:
summarise() ungrouping output (override with .groups argument)
Species Sepal.Length_Sum Sepal.Width_Sum Petal.Length_Sum Petal.Width_Sum
<fct> <dbl> <dbl> <dbl> <dbl>
setosa 250. 171. 73.1 12.3
versicolor 297. 138. 213 66.3
virginica 329. 149. 278. 101.
我想删除应用交叉函数后添加的 _Sum。
R 4.0.0
dplyr 1.0.0
在那种情况下我们不需要命名 list
library(dplyr)
iris %>%
group_by(Species) %>%
summarise(across( .cols = is.numeric, .fns = sum, na.rm = TRUE))
或者,如果我们仍想使用命名的 list
,则指定 .names
,这将在添加前缀或后缀以及通过仅指定 [=15 删除任何额外内容方面提供更多控制=]
iris %>%
group_by(Species) %>%
summarise(across( .cols = is.numeric, .fns = list(Sum = sum),
.names = "{col}",na.rm = TRUE))
# A tibble: 3 x 5
# Species Sepal.Length Sepal.Width Petal.Length Petal.Width
# <fct> <dbl> <dbl> <dbl> <dbl>
#1 setosa 250. 171. 73.1 12.3
#2 versicolor 297. 138. 213 66.3
#3 virginica 329. 149. 278. 101.