r函数访问本地字符串变量

Question

我正在尝试编写一个函数来打印出某些图形的pdf。我希望我的函数有2个参数（选项）：我将从中绘制图形的数据集和用于pdf文件名的字符串变量。如何将字符串传递给函数中的命令？我的代码是：

 plot_all_layout <- function(network, filename){
    layouts <- grep("^layout_", ls("package:igraph"), value=TRUE)[-1] 
      # Remove layouts that do not apply to our graph.
      layouts <- layouts[!grepl("bipartite|merge|norm|sugiyama|tree", layouts)]

      par(mfrow=c(3,3), mar=c(1,1,1,1))
      pdf("filename.pdf") #here is where I would like to call the local var

      for (layout in layouts) {
        print(layout)
        l <- do.call(layout, list(network)) 
        plot(network, edge.arrow.mode=0, layout=l, main=layout) }
      dev.off()
      par(mfrow=c(1,1)
  }

Answer 1

我认为你应该使用pdf(paste0(filename, ".pdf"))

希望这有帮助。