小提琴图(Violin Plot) 是箱线图与核密度图的结合,个人理解为,由于形状像小提琴,所以命名为小提琴图。 R中可以使用
vioplot 包的 vioplot() 函数画小提琴图,vioplot函数的使用格式为:
vioplot(x1, x2, ..., names = , col = )
其中x1, x2 为要绘制的一个或多个数值向量,names是小提琴图标签的字符向量,col为每一个小提琴的颜色。当然,还有许多其它参数,像lwd, lty, border, horizontal等等,可以使用help(vioplot) 或者 ?vioplot查询。
使用R自带的数据集mtcars来画小提琴图,代码如下:
#安装并加载包
install.packages('vioplot')
library.packages(vioplot)
attach(mtcars)
x1 <- mpg[cyl == 4]
x2 <- mpg[cyl == 6]
x3 <- mpg[cyl == 8]
vioplot(x1,x2,x3, names = c('4缸', '6缸', '8缸'), col = 'tomato')
title('Violin Plot of Miles per Gallon',
xlab = '缸数',
ylab = 'Miles Per Gallon')
#X轴和Y轴分别写中英文,只是想说明语言类型都是OK的
x1, x2, x3变量是按照缸数分的,vioplot() 函数要求将绘制的不同组分离到不同的变量中。
作出的图如下:
vioplot(x1, x2, ..., names = , col = )
其中x1, x2 为要绘制的一个或多个数值向量,names是小提琴图标签的字符向量,col为每一个小提琴的颜色。当然,还有许多其它参数,像lwd, lty, border, horizontal等等,可以使用help(vioplot) 或者 ?vioplot查询。
使用R自带的数据集mtcars来画小提琴图,代码如下:
#安装并加载包
install.packages('vioplot')
library.packages(vioplot)
attach(mtcars)
x1 <- mpg[cyl == 4]
x2 <- mpg[cyl == 6]
x3 <- mpg[cyl == 8]
vioplot(x1,x2,x3, names = c('4缸', '6缸', '8缸'), col = 'tomato')
title('Violin Plot of Miles per Gallon',
x1, x2, x3变量是按照缸数分的,vioplot() 函数要求将绘制的不同组分离到不同的变量中。
作出的图如下:
