使用write.table或write.csv自动将对象名称用作文件名

Question

使用write.table或write.csv时,有没有办法让对象名称成为文件名字符串？

在下文中,a和b是向量.我将对许多其他矢量对进行类似的比较,并且不想像我一直多次写出对象名.

unique_downa <-a [!(以%B A%)]

write.csv(unique_downa,文件= "unique_downa.csv")

或者,如果有人建议更好地完成整个过程,我会很高兴听到它.

Answer 1

惯用的方法是使用 deparse(substitute(blah))

例如

 write.csv.named <- function(x, ...){
      fname <- sprintf('%s.csv',deparse(substitute(x)))
      write.csv(x=x, file =  fname, ...)
 }