#加载tidyverse包
library(tidyverse)
# 使用iris数据集
data("iris")
# 利用across函数计算不同指标的均值、标准差、标准误
cal <- iris %>%
group_by(Species) %>%
summarize(
across(
c("Sepal.Length", "Sepal.Width", "Petal.Length", "Petal.Width"),
list(
mean = ~mean(.x, na.rm = TRUE),
sd = ~sd(.x, na.rm = TRUE),
count = ~n(),
se = ~sd(.x, na.rm = TRUE) / sqrt(n())
),
.names = "{col}_{fn}"
),
.groups = 'drop'
)
# 输出结果
print(cal)
R语言求不同分组的均值、标准差、标准误
于 2024-05-15 20:02:01 首次发布