R语言sink()函数输出含命令问题：如何仅保留结果写入文件

嘿，刚学R的时候我也踩过这个sink()的坑，太懂这种明明只想存结果却把命令也带进去的烦躁了！

为什么会出现这个问题？ #

你在RStudio控制台逐行输入命令时，控制台会回显你输入的命令（就是那些带>的行），而默认的sink()会捕获控制台的所有内容——包括命令回显和真正的输出结果，所以文件里才会混进命令行。

几种可行的解决方法： #

1. 明确指定sink的type参数（简单直接）

给sink()加上type = "output"，它就只会捕获程序的输出结果，而不会包含命令回显：

# 开启定向，指定只捕获输出
sink("hello.txt", type = "output")
cat("hello world")
# 关闭定向
sink(type = "output")

打开生成的hello.txt，就只有hello world啦。

2. 在脚本文件中运行代码（更规范）

把你的代码写到一个.R脚本文件里，然后整个运行脚本（比如在RStudio里点"Run"按钮，或者用source("你的脚本名.R")）。脚本运行时不会回显命令本身，所以即使不用额外参数，sink()也只会捕获输出结果。

3. 用capture.output()替代sink（更灵活）

如果你只是想捕获某段代码的输出，capture.output()是更针对性的选择，它会直接把输出结果存成字符向量，再写入文件：

# 捕获cat的输出结果
output_content <- capture.output(cat("hello world"))
# 写入文件
writeLines(output_content, "hello.txt")

这个方法不用管开启/关闭sink，对新手更友好。

内容的提问来源于stack exchange，提问作者Dan