将3组数据做单因素方差分析，导出每2组数据的显著性至excel，R语言代码

以下是将3组数据进行单因素方差分析并将每两组数据的显著性导出至Excel的R语言代码：

# 读取数据
data1 <- read.csv("data1.csv")
data2 <- read.csv("data2.csv")
data3 <- read.csv("data3.csv")

# 进行单因素方差分析
fit <- aov(dependent_variable ~ independent_variable, data = rbind(data1, data2, data3))

# 计算每两组数据的显著性
pairwise <- pairwise.t.test(dependent_variable ~ independent_variable, data = rbind(data1, data2, data3))

# 将每两组数据的显著性导出至Excel
library(xlsx)
write.xlsx(pairwise$p.value, "your_output.xlsx", sheetName = "pairwise_results")

将上述代码中的"data1.csv"、"data2.csv"、"data3.csv"分别替换为你的三组数据文件名，"dependent_variable"替换为因变量的列名，"independent_variable"替换为自变量的列名，"your_output.xlsx"替换为你的输出文件名。这个代码将会将每两组数据的显著性写入到一个名为"pairwise_results"的Excel工作表中。