如何将 2x2 列联表粘贴到 rstudio？答案

【问题标题】：How to paste 2x2 contingency table into rstudio?如何将 2x2 列联表粘贴到 rstudio？
【发布时间】：2021-07-23 12:10:58
【问题描述】：

有没有办法将 2x2 列联表从 MS Excel 直接导入 R？我试过 read.table，它没有用。在 R 中创建 2x2 表需要执行 matrix()、colname () 等步骤。我希望将现有的 2x2 表引入 R 并进行进一步的统计。任何建议都非常感谢。

示例 2x2 表：

Sample 2x2 Table:

【问题讨论】：

“它没用”不是很有帮助。没用怎么办？最简单的方法是将其保存为 .csv 文件，然后执行read.table("dat.csv", sep=",")。
试试readxl::read_excel。
谢谢，会试试的。
出现以下错误。 “无法加载 X11 模块”有什么想法吗？
您使用的是什么操作系统？如果您想要一个单线来获得桌子，这将做到tbl <- matrix(c(44, 300, 20, 902), 2, 2, dimnames=list(Exposed=c("Exposed", "Not Exposed"), Sick=c("Sick", "Not sick")))。

标签： r datatable

【解决方案1】：

下面的函数自动执行从 Excel 文件读取和设置行名所需的几个步骤。

假设它是

双向列联表；
在表 1 中。

如果不是这样，请更改函数的默认值并在点参数中传递其他参数。

read_contingency_excel <- function(path, col_names = TRUE, 
                                   col_types = c("text", "numeric", "numeric"),
                                   ...){
  tbl <- readxl::read_excel(path, col_names = col_names, col_types = col_types, ...)
  tbl <- as.data.frame(tbl)
  row.names(tbl) <- tbl[[1]]
  tbl[[1]] <- NULL
  tbl
}

【讨论】：

谢谢，我会试试的。
出现以下错误； “无法加载 X11 模块”。