R语言四格表的统计分析及假设检验

R语言四格表的统计分析及假设检验

四格表（contingency table），也称为交叉表，是统计学中常用的一种数据展示形式。它由行和列组成，用于比较两个或多个分类变量之间的关系。本文将介绍使用R语言进行四格表的统计分析和假设检验，并提供相应的源代码。

首先，我们需要准备一个包含两个或多个分类变量的数据集。假设我们有一个调查数据集，调查了100个人的性别和喜欢的运动类型，数据如下所示：

# 创建一个示例数据集
gender <- c("男", "女", "女", "男", "男", "女", "女", "男", "男", "男")
sport <- c("篮球", "足球", "足球", "篮球", "篮球", "乒乓球", "乒乓球", "篮球", "足球", "乒乓球")

# 创建四格表
table_data <- table(gender, sport)
print(table_data)

运行以上代码后，可以得到如下的四格表：

     sport
gender 乒乓球 篮球 足球
   女      2   0   2
   男      1   3   2

接下来，我们可以对四格表进行统计分析。常见的统计指标包括行和列的总计、行和列的比例、以及卡方检验等。

首先，我们可以计算各行和各列的总计，可以使用rowSums()和colSums()函数：

# 计算各行的总计
row_