查找for循环中生成的各个图的属性

Question

我正在尝试计算我从数据框创建的图形的渐变和相关索引。应该从数据帧的每一列生成一个图表。为了得到图表，我使用了这段代码：

for(c in names(x15.sub))
print(ggplot(data=x15.sub) + geom_point(aes(x = x15.sub[[c]], y = T8641))
    + geom_smooth(method = lm, aes(x = x15.sub[[c]], y = T8641))+ labs(x=c))

我认为我需要使用命令'attributes'来获取渐变，但我无法确定代码中的位置，因为每个图形似乎都是在没有“名称”的情况下生成的。 我也无法弄清楚如何保存图表。任何帮助将非常感激！