R軟件的代碼是完全免費開放的,有很多程序包可供我們安裝和使用,其中臉譜圖就需要用到aplpack這個程序包。
工具/原料
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函數中的參數,對比一下效果。
注意事項
R軟件是區分了大小寫字母的,在編寫程序代碼時要注意。