R：带ggplots的填充列表导致奇怪的结果...... R中的错误？

Question

我在R中发现了一个非常奇怪的事情，如果我不知道更好（我不知道）我会说这是R中的一个错误......

library(ggplot2, gridExtra)
data(mtcars)

gglist <- list()
for (colname in names(mtcars)) {
  gg <- ggplot(mtcars,aes(x=get(colname),y=mpg)) + geom_point() + labs(x=colname)
  nextelnr <- length(gglist)+1
  gglist[[nextelnr]] <- gg

  print(gglist[[nextelnr]])
  if(nextelnr>2) {
    print(gglist[[nextelnr-1]])
  }

}
print(gglist[[3]])
do.call("grid.arrange", c(gglist, ncol=floor(sqrt(length(gglist)))))

发生了什么：从循环内正确打印图，但是循环外的图重复相同（即最后一个）ggplot - 但是使用不同的x标签。

我现在知道使用

aes_string(x=colname,y="mpg")

解决了这个问题，但它没有回答这个问题。

这怎么可能？