`plot` 如何知道如何在没有进一步说明的情况下绘制对象？答案

【问题标题】：How does `plot` know how to plot an object without further specification?`plot` 如何知道如何在没有进一步说明的情况下绘制对象？
【发布时间】：2022-01-16 22:45:02
【问题描述】：

使用 R 基函数 plot，我们只需提供数据即可制作不同的绘图，而无需指定进一步的参数。例如，如果我们绘制一个时间序列，使用plot(my_ts) 调用plot.ts(my_ts) 因为my_ts 是类ts。

同样，我们可以使用不带任何参数的 plot ANOVA 结果。这里有一些 ANOVA 模型：

data <- data.frame(group = c(rep("group_1",25),rep("group_2",25)), scores = c(runif(25,0,1),runif(25,1.5,2.5)))
mod1 <- aov(scores~group,data=data)

使用plot(mod1) 有效，但plot(summary(mod1)) 会导致错误

"xy.coords(x, y, xlabel, ylabel, log) 中的错误： 'x' 是一个列表，但没有组件 'x' 和 'y'"。

似乎plot 函数在尝试自动创建不带任何参数的绘图时查找名为x 和y 的数据。我尝试了names(mod1)，但找不到任何x 或y。那么plot(mod1) 工作而plot(summary(mod1)) 不工作是怎么来的呢？

【问题讨论】：

因为summary(mod1)返回一个c类的对象(summary.aov,listof)并且没有内置的plot.summary.aov函数。出于兴趣，您期望显示什么是方差分析的摘要图？
你看到的是S3 method dispatch（或者没有，对于摘要对象）。
@Limey 实际上我的问题不是关于绘制一个 aov 夏季对象，而是关于 S3 方法调度的问题。我构建了一个包，它会根据提供的类做出不同的反应。这就是我的问题的背景。
啊！很公平。

标签： r class plot

【解决方案1】：

在键入plot(x) 时，根据class(x) 调用了多个方法。这称为方法分派。也可以创建新的自己的方法，例如plot.summary.aov 用于摘要对象：

data <- data.frame(group = c(rep("group_1",25),rep("group_2",25)), scores = c(runif(25,0,1),runif(25,1.5,2.5)))
mod1 <- aov(scores~group,data=data)

plot(mod1)

让我们定义一个新的存根绘图函数

plot.summary.aov <- function(x) {
  plot(iris)
}

plot(summary(mod1))

methods(plot)
#>  [1] plot.acf*           plot.data.frame*    plot.decomposed.ts*
#>  [4] plot.default        plot.dendrogram*    plot.density*      
#>  [7] plot.ecdf           plot.factor*        plot.formula*      
#> [10] plot.function       plot.hclust*        plot.histogram*    
#> [13] plot.HoltWinters*   plot.isoreg*        plot.lm*           
#> [16] plot.medpolish*     plot.mlm*           plot.ppr*          
#> [19] plot.prcomp*        plot.princomp*      plot.profile.nls*  
#> [22] plot.R6*            plot.raster*        plot.spec*         
#> [25] plot.stepfun        plot.stl*           plot.summary.aov   
#> [28] plot.table*         plot.ts             plot.tskernel*     
#> [31] plot.TukeyHSD*     
#> see '?methods' for accessing help and source code

【讨论】：