用R语言做分组单因素方差分析

#此处数据源是一个两列数据excel文件，一列为不同处理trt，一列为对应结果response
install.packages('openxlsx')
library(openxlsx)  

# 读取Excel文件  
data <- read.xlsx("地址.xlsx", sheet = 1)  

aggregate(data$response, by=list(data$trt), FUN=mean)
aggregate(data$response, by=list(data$trt), FUN=sd)

fit <- aov(data$response ~ data$trt)
summary(fit)

运行即可得到均值，标准差及组间差异