Question

我是R的新手，所以我确信这很简单。这可以作为循环打印双变量表和卡方：

results <- lapply(c("age", "female", "black"), 
function(var){
print(table(data$heart,data[,var]));
print(chisq.test(data$heart,data[,var], correct = FALSE))
})

对于第一个变量，它会输出以下结果：

       0    1
  0 1016  977
  1   47   35

        Pearson's Chi-squared test

data:  data$heart and data[, var]
X-squared = 1.2665, df = 1, p-value = 0.2604

我只是想在表格中打印实际变量名称而不是＆＃34; data [，var]＆＃34;在chi-sq结果中，所以我知道我在看什么。

感谢您的帮助！

Answer 1

我相信这应该有用

fun <- function(var){
    print(table(data$heart,data[,var], dnn = c('heart', paste(var))))
    out <- chisq.test(data$heart,data[,var], correct = FALSE)
    out$data.name <- paste('heart and',var)
    print(out)
}

results <- lapply(c("age", "female", "black"),fun)

R打印变量名称，chi-sq循环

1 个答案: