无法打开保存在R函数中的pdf

Question

我通过以下功能保存了两个数字。但是，我不能打开它们中的任何一个。错误消息是＆＃34;无法打开文件，因为某些内容使其无法打开＆＃34;

＃

starttest()

starttest <- function() {
  helperfunction("1")

  helperfunction("2")
}

helperfunction<- function(i) {
  dat = data.frame(x = c(1:10), y = c(2:11)) 

  pdf(paste(i,'figure1.pdf',sep = ""))
  ggplot(data = dat, aes(x = x, y = y)) + geom_step()
  dev.off()
}

＃

但是，如果我通过选择代码运行以下代码并点击＆＃34; Ctrl R＆＃34;，则可以打开两个pdf

＃

dat = data.frame(x = c(1:10), y = c(2:11)) 

 pdf(paste(1,'figure1.pdf',sep = ""))
 ggplot(data = dat, aes(x = x, y = y)) + geom_step()
 dev.off()

 pdf(paste(2,'figure1.pdf',sep = ""))
 ggplot(data = dat, aes(x = x, y = y)) + geom_step()
 dev.off()

＃

所以，只要将图保存在main函数调用的函数中，我就无法打开图.......