r - 比较 ggplot2 中的多个 lm() 结果

Question

我有以下示例图：

通过创建：

    q<-ggplot(data=all_summ,aes(x=Xvals, y=Yvals,color=ColorVals),size=2)+
      geom_point(size=2)+
      geom_smooth(method = "lm", fill = NA)+
      facet_grid(.~facets)

我的问题是：如何比较创建的 lm() 模型？通常我会这样做：

lm_model1<-lm(...)
lm_model2<-lm(...)
anova(lm_model1,lm_model2)

或类似的东西。不幸的是，如果所有模型都是在ggplot2. 它是否在某个地方存储了所有这些模型，以便我可以分析它们？

标签： rggplot2lmfacet-grid