现代统计图形 - 科学网—博客

A.1 对象类型 159
[21] plot.lda* plot.lm
[23] plot.mca* plot.medpolish*
[25] plot.mlm plot.ppr*
[27] plot.prcomp* plot.princomp*
[29] plot.profile* plot.profile.nls*
[31] plot.ridgelm* plot.rpart*
[33] plot.spec plot.spec.coherency
[35] plot.spec.phase plot.spline*
[37] plot.stepfun plot.stl*
[39] plot.survfit* plot.table*
[41] plot.ts plot.tskernel*
[43] plot.xyVector*
Non-visible functions are asterisked
可以看出,这些函数都是以plot.*的形式定义的,其中*便是类的名
称。泛型函数的基本原理就是:传给plot()的第一个参数是何种类,则调用
何种函数进行作图。 例如iris的类是data.frame,那么plot(iris)就会调
用plot.data.frame()作图(散点图矩阵)。下面的代码有助于进一步说明这种
原理:
1 > class(iris)
[1] "data.frame"
1 > plot(iris)
2 > x = density(faithful$waiting)
3 > class(x)
[1] "density"
1 > plot(x)
我们也可以对现有的泛型函数进行扩充,使它们适应我们自定义的类。
例如print()也是一个常用的泛型函数,当我们在R控制台中键入一个对象以
显示其内容时,实际上是调用了该函数以打印出对象的内容。现在我们定
义一个print.yihui(),使得类名称为yihui的对象在屏幕上打印出来时数值为
真实数值的2倍:
1 > # 本例告诉我们,眼见未必为实!
2 > x = 1:5
3 > class(x)