使用选项卡将数据写入文件

cra*_*zjo 2 r paste

我有文件,信息由选项卡分隔.我想将计算值附加到每个特定文件,并尝试使用'paste'命令获取相同的格式,但它会分隔一行而不是一个制表符.该文件看起来像(使用[tab]表示选项卡):

text[tab]=[tab]value
text[tab]=[tab]value
Run Code Online (Sandbox Code Playgroud)

使用选项卡创建单行无法使用粘贴,因为它将打印\ t:

conv <- paste("conversion", "=", (y[,2]/90.6),sep="\t")
Run Code Online (Sandbox Code Playgroud)

但是如果我稍后尝试使用以下方法添加标签:

conv <- paste("conversion", "=", (y[,2]/90.6),sep=",")
write(conv, file = "data.dat", append = TRUE, sep = "\t")
Run Code Online (Sandbox Code Playgroud)

"conv"分开排列:

text[tab]=[tab]value
text[tab]=[tab]value
conversion
=
11.7991169977925
Run Code Online (Sandbox Code Playgroud)

而不是在标签中(我想要的):

text[tab]=[tab]value
text[tab]=[tab]value
conversion[tab]=[tab]11.80
Run Code Online (Sandbox Code Playgroud)

我相信必须有一个非常简单的解决方案,但我根本找不到.谢谢!

Mar*_*ler 5

我认为这可以使用Arun的建议实现你想要的.虽然,我同意Carl Witthoft的评论.

y1 <- c(10, 20)
y2 = c(100,200)
y <- data.frame(y1,y2)
colnames(y) <- c('y1','y2')

y3 <- (y[,2]/90.6)

df <- data.frame('conversion', '=', y3)
colnames(df) <- c('t1', 't1', 'y3')
df

write.table(df, file = "c:/users/Mark W Miller/simple R Programs/my.data.txt", 
            append = TRUE, sep = "\t", row.names=FALSE, col.names=FALSE, quote=FALSE)
Run Code Online (Sandbox Code Playgroud)

输出文件是:

conversion  =   1.1037527593819
conversion  =   2.2075055187638
Run Code Online (Sandbox Code Playgroud)