R中write.table的文件名中的变量答案

【问题标题】：variable in the file name for write.table in RR中write.table的文件名中的变量
【发布时间】：2011-10-10 01:00:52
【问题描述】：

请帮我解决一个幼稚的问题（已经用谷歌搜索过，并尝试了很多变体，但失败了）：如何使用 R 中 write.table 的文件名中的变量保存文件？脚本循环遍历 dir 中的文件，应用一些函数，然后将结果保存到具有相同名称但附加结尾的文件中。谢谢！

for (x in list.files(pattern="SIM")) {
                      u <- read.table(x, header = T, row.names = 1, sep = " ")
                      ut <- t(u)
                      utm <- colMeans(ut)
                      utms <- sort(utm, decreasing = T)
                      write.table(utms, "$x.mean")
                      }

【问题讨论】：

标签： r

【解决方案1】：

您可以使用paste 来执行此操作。

尝试以下方法：

write.table(utms, file=paste(x, ".mean", sep=""))

paste 连接字符向量。详情请见?paste。

【讨论】：

【解决方案2】：

sprintf 函数也可以用于这种类型的东西，但语法略有不同：

write.table(utms, file=sprintf("%s.mean",x))

【讨论】：

【解决方案3】：

您还可以将以下内容用于数据框：

now<-format(Sys.time(), "%d-%m-%Y")
csvFileName <- paste("Your_df_",now,".csv",sep="")
write.csv(WKSH_Check, file=csvFileName)

【讨论】：