Stargazer:保存到文件，不在控制台中显示

Question

当我想要保存我的回归结果时

stargazer(regressions[[reg]], out=myFile, out.header=FALSE

stargazer还会将结果显示/打印到控制台中。当我迭代了几十个结果时，这破坏了我的概述和日志。有没有什么方法可以显式地告诉stargazer不仅要将输出保存到文件中，而且不要另外打印它？

我上stargazer_5.1了。

Answer 1

您可以编写一个函数来捕获stargazer的输出，并将其保存到一个文件中，而不需要向控制台输出任何内容。例如，改编来自this SO answer的代码

mod_stargazer <- function(output.file, ...) {
  output <- capture.output(stargazer(...))
  cat(paste(output, collapse = "\n"), "\n", file=output.file, append=TRUE)
}

然后，运行该函数：

mod_stargazer(myfile, regressions[[reg]], header=FALSE)

append=TRUE会导致将所有表保存到同一个文件中。如果您希望每个表都有单独的文件，则将其删除。

Answer 2

好的，根据eipi10的答案，您唯一需要的部分是

bla <- capture.output(stargazer(..., out=output.file))

在stargazer中指定输出文件，并随机捕获输出，您只需删除或覆盖下一个表即可。不需要定义新函数。

Answer 3

解决这个问题的最简单方法是：

在没有输出文件或capture.output()的情况下，

1. 将观星者的输出存储在一个对象中

output <- stargazer(..., type="text")

这会将输出存储为nx1矩阵，这看起来并不好，因此必须在第二步中对其进行转换

1. 将输出对象转换为良好的格式

2.a)使用dplyr：

output %>% paste(., collapse = "\n") %>% cat("\n")

2.b)不使用dplyr：

cat(paste(output, collapse = "\n"), "\n")

2.c)作为一个函数，如果你真的喜欢这样：

print_stargazer <- function(object) {
   cat(paste(object, collapse = "\n"), "\n")
}

然后像这样使用它：

output <- stargazer(..., type="text")
print_stargazer(object)