R 语言经典实例（原书第 2 版）

90

｜

第

4

章

如果重复地使用 cat 函数将结果重定向到文件中，请务必确认设置 append=TRUE。否

则，每次调用 cat 函数都会覆盖文件的原有内容：

cat(data, file = "analysisReport.out")

cat(results, file = "analysisRepart.out", append = TRUE)

cat(conclusion, file = "analysisReport.out", append = TRUE)

像这样对文件名进行硬编码是一个烦琐且容易出错的过程。你是否注意到上述第二行中

文件名出现了拼写错误？与其重复对文件名进行硬编码，我们建议打开一个到文件的连

接并将结果输出到这一连接中：

con <- file("analysisReport.out", "w")

cat(data, file = con)

cat(results, file = con)

cat(conclusion, file = con)

close(con)

（在输出到连接时，你不需要 append = TRUE，因为在这里 append 是默认设置。）这

种技术在 R 脚本中特别有用，因为它使你的代码更可靠，且更易于维护。

4.4 显示文件列表

4.4.1 问题

你希望得到一个显示工作目录中文件列表的 R 向量。

4.4.2 解决方案

函数 list.files 能显示当前工作目录中的文件：

list.files()

#> [1] "_book" "_bookdown_files" ...