如何将描述行添加到R中的.text输出的标题中

Question

我正在尝试从data.frame对象创建一个.csv或.txt文件，该文件还包含一些描述变量详细信息的行。

这是我的第一次尝试：

Head <- "
#variables:
#sal - Salinity [PSU]
#temp - Temperature [degrees Celsius]
"

n <- 10
df <- data.frame(sal=runif(n, 30, 37), temp=runif(n, 15, 17))
df

sink("data.txt")
Head
df
sink()

结果如下：

[1] "\n#variables [units]:\n#sal - Salinity [PSU]\n#temp - Temperature [degrees Celcius]\n"
        sal     temp
1  32.11494 15.35176
2  30.57537 16.80972
3  32.90651 15.95174
4  30.62192 15.73436
5  31.43069 15.45873
6  34.38173 15.69713
7  31.27954 15.01126
8  32.77093 16.22493
9  35.99510 15.10123
10 35.52409 15.49084

但是，我真的希望它看起来像这样：

#variables [units]:
#sal - Salinity [PSU]
#temp - Temperature [degrees Celcius]

        sal     temp
1  32.11494 15.35176
2  30.57537 16.80972
3  32.90651 15.95174
4  30.62192 15.73436
5  31.43069 15.45873
6  34.38173 15.69713
7  31.27954 15.01126
8  32.77093 16.22493
9  35.99510 15.10123
10 35.52409 15.49084

Answer 1

使用cat而不是让R调用对象的print方法。

sink("data.txt")
cat(Head)
df
sink()