在R语言中编写自定义函数以添加p值到三线表
首先,让我们了解一下什么是三线表。三线表是一种常用于统计学和研究领域的数据展示方式,用于汇总不同组之间的统计指标,例如均值、标准差和p值。在R语言中,我们可以使用自定义函数来自动生成这样的三线表,并添加p值。
下面是一个简单的示例数据集,其中包含两个组的观测值:
# 示例数据集
group1 <- c(10, 12, 8, 11, 9)
group2 <- c(14, 15, 11, 13, 12)
# 将数据集合并为一个数据框
data <- data.frame(group1, group2)
接下来,我们将编写一个自定义函数,该函数将接收两个组的数据作为输入,并返回一个包含均值、标准差和p值的三线表。
# 自定义函数:生成带p值的三线表
generate_summary_table <- function(group1, group2) {
# 计算均值
mean_group1 <- mean(group1)
mean_group2 <- mean(group2)
# 计算标准差
sd_group1 <- sd(group1)
sd_group2 <- sd(group2)
# 计算p值
p_value <- t.test(group1, group2)$p.value
# 创建三线表数据框
summary_table <- data.frame(
Measure = c("Mean", "SD", "p-value"),
Group1 = c(mean_group1, sd_group1, p_value),
Group