使用epiDisplay包的cs函数计算相对危险度及其置信区间

使用epiDisplay包的cs函数计算相对危险度及其置信区间

相对危险度（Relative Risk）是一种常用的流行病学指标，用于衡量两个暴露组之间疾病发生的比率差异。在R语言中，我们可以使用epiDisplay包中的cs函数来计算相对危险度及其置信区间。本文将详细介绍如何使用cs函数进行计算，并提供相应的源代码示例。

首先，我们需要安装并加载epiDisplay包。可以使用以下代码完成此步骤：

install.packages("epiDisplay")  # 安装epiDisplay包
library(epiDisplay)  # 加载epiDisplay包

接下来，我们假设有一个研究涉及两个暴露组（例如，吸烟和非吸烟），我们想要比较两组人群中心脏病发生率的差异。我们需要收集两个组的人数及其发生中心脏病的人数。以下是一个示例数据集：

# 创建示例数据集
exposed <- c(150, 200)  # 暴露组人数
unexposed <- c(300, 400)  # 非暴露组人数
cases_exposed <- c(20, 30)  # 暴露组中心脏病发生人数
cases_unexposed <- c(10, 15)  # 非暴露组中心脏病发生人数

# 创建数据框
data <- data.frame