错误：映射必须由'aes（）'创建

Question

我正在使用for循环在R中创建100个ggplots，将其绘制到一张纸上。但是，我一直在获取必须由aes（）错误创建的映射，并且我不确定如何修复它。

无论有没有环境，我都尝试过get函数，不清楚下一步该怎么做。

for(i in 1:99){
  nam <- paste("p", i, sep = "")

  otunam <- paste("OTU", i, sep = "")

  otunam1 <- get(otunam, envir = as.environment(histotu), inherits = TRUE)

  plot <- ggplot(histotu, aes(x=otunam)) + geom_histogram(histotu, stat = "bin", binwidth = 0.01) + geom_vline(xintercept=expD[1,i], color = "red") + xlab(otunam)

  assign(nam, plot)
}

我想清除此错误，并能够使用grid.arrange制作100个图形。我有这部分要工作，但没有for循环来创建它调用的对象。