3D图形能够从不同的角度解释方程或图形,这样显得更直观,更容易了解变量之间关系,今天我们通过rgl包绘制交互3D图。
我们先导入R包和数据,数据使用R语言自带的鸢尾花数据来演示
library("rgl")
iris<-iris
这是R自带的数据,表示的3种鸢尾花的茎叶长宽等数据。
我们把它的数据一部分提出来
pwid<-iris$Petal.Width
plen<-iris$Petal.Length
swid<-iris$Sepal.Width
slen<-iris$Sepal.Length
rgl包绘制3D图需要分别提,x,y,z轴的数据
plot3d(x=pwid,y=plen,z=swid)
这样一个简单的3D散点图这样就画好了,我们可以按住鼠标对它进行拖动观察
我们还可以对图形进行进一步的修饰调整点的大小,把点改为立体的
plot3d(x=pwid,y=plen,z=swid,size=1.5,type = "s")
还可以对颜色进行进一步修改
plot3d(x=pwid,y=plen,z=swid,size=1.5,type = "s",col = c(1,2,3)[as.numeric(iris$Species)])
若是想添加图例,可以
legend3d("topright",col=1:3,legend=levels(iris$Species),pch=16,cex=2)
未完待续