如何将统计分析输出写入 R 中的单独文本文件？答案

【问题标题】：How can I write statistical analysis output to separate text files in R?如何将统计分析输出写入 R 中的单独文本文件？
【发布时间】：2016-09-29 11:28:26
【问题描述】：

有人可以帮我解决以下问题吗？

我必须使用相同的预测变量进行许多统计分析，但结果却不同。到目前为止，我设法编写了一个进行分析的脚本。但我想将分析的输出写入以结果名称作为文件名的分隔文本文件。

这是一些测试数据：

subject age sex country race service cancer
1   19  2   2   0   1   0
2   34  2   4   0   0   1
3   36  1   4   0   0   1
4   36  2   7   0   0   1
5   18  1   7   1   0   0
6   34  2   3   0   0   0
7   37  2   3   0   0   1
8   46  1   3   1   0   0

到目前为止，这是我的脚本：

lapply(c("race", "cancer"),

   function(var) {

       formula    <- as.formula(paste(var, "~ age + sex + country"))
       res <- lm(formula, data = test)

       summary(res)
   })

接下来我希望为变量“race”创建一个带有摘要（res）的单独输出文本文件，并将其命名为“race”。还有一个名为“cancer”的单独文本文件，其中包含该分析的摘要。

【问题讨论】：

标签： r loops output analysis

【解决方案1】：

您可以尝试以下方法：

lapply(c("race", "cancer"),

       function(var) {

         formula    <- as.formula(paste(var, "~ age + sex + country"))
         res <- lm(formula, data = test)
         summary(res)
         capture.output(summary(res), file = paste(eval(var), ".txt", sep = ""))

       })

【讨论】：