如何利用R软件绘制脸谱图？

打开R软件，选中程序包，点击安装程序包，弹出一个窗口。首选选择CRAN镜像，China开头的都可以，确定后，出现很多程序包，这里选择aplpack包，确定。大概等待1分钟，程序包安装成功。

aplpack程序包安装完成后，需要运行代码library(aplpack)，程序包中的函数才能使用。其中脸谱图的函数为faces。这里介绍一下函数faces的几个应用较多的参数。faces(xy,face.type = 1，main,plot.faces = TRUE) 其中xy为数据框，是绘制脸谱图必须输入的项；face.type是脸谱的类型选择，有0,1,2三个取值,0绘制的脸只有线条，1则对脸的个元素进行了颜色填充，2绘制出的是圣诞老人头像；main是为绘制的图形加标题；plot.face=TRUE表示绘制脸谱，=FALSE则不会出现脸谱。

下面以几个实例进行说明。例如，通过人物的年龄、身高、体重几个指标绘制脸谱图。首先输入数据，生成数据框。#输入数据集age=c(12,10,11,13)hight=c(145,138,150,147)weight=c(45,39,51,50)name=c('小田','小明','小冬','小南')#生成数据集class=data.frame(age,hight,weight,row.names=name)

然后输入绘制脸谱图的命令。这里注意先要引用程序包。#引用程序包library(aplpack)#绘制脸谱图faces(class,face.type = 1, nrow.plot=2,ncol.plot=2, main='根据年龄、身高、体重绘制的脸谱图', plot.faces = TRUE)运行代码，绘制出的图形如下。这里nrow.plot、ncol.plot表示绘制的图形排成几行几列。这里排成2×2的形式。

我们还可以结合plot函数将脸谱图绘制到一个坐标轴中。程序代码如下：#为脸谱图添加坐标轴a<-faces(class,plot.faces=FALSE)plot(0:5,0:5,type='n')plot(a,x.pos=1:4,y.pos=1:4,1.5,0.7)

这里再举一个例子，绘制随机脸谱图。程序代码：#生成随机脸谱图faces(matrix(sample(1:1000,90),9,10),face.type=2,main='随机脸谱图')其中sample（1:1000,90）表示在1到1000内取90个随机样本，matrix表示将这90个数据转换成9×10的数据矩阵。这里face.type取值为2，绘制出的脸谱图是以圣诞老人为原型的。

为了加深理解，可以设置不同的faces函数中的参数，对比一下效果。