R小提琴图（vioplot）不显示相同值的数据

Question

我正在尝试创建一个调查结果的小提琴情节，一切看起来都很好，期待所有受访者提交相同答案的情况。在这些情况下，vioplot什么也没有显示，我从vioplot更改为boxplot，至少有一行答案。

我的代码：

plot(1,1,xlim=c(0,10),ylim=range(c(x1,x2,x3,x4,x5,x6,x7,x8,x9)),type="n",
 xlab="",ylab="",axes=FALSE)
axis(side = 1, at=2,label="")
axis(side = 1, at=5,label="")
axis(side = 1, at=8,label="")

axis(side=2)
vioplot(x1,at=1,col="blue",add=TRUE)
vioplot(x2,at=2,col="red",add=TRUE)
vioplot(x3,at=3,col="yellow",add=TRUE)
vioplot(x4,at=4,col="blue",add=TRUE)
vioplot(x5,at=5,col="red",add=TRUE)
vioplot(x6,at=6,col="yellow",add=TRUE)
boxplot(x7,at=7,col="blue", add=TRUE)
boxplot(x8,at=8,col="red",add=TRUE)
vioplot(x9,at=9,col="yellow",add=TRUE)

这就像boxplot一样，使用vioplot代替，整个列都是空的。

任何想法我做错了什么以及代码应该是什么样的，以便我可以使用vioplot？

Answer 1

快速玩一下这个包。没有多少选择，看起来它没有很好地处理这些情况。您可以尝试对数据进行抖动，为图形创建一些小的随机噪声，例如

Packages.props

我最好的建议是在ggplot2包中试用geom_violin。

http://www.sthda.com/english/wiki/ggplot2-violin-plot-quick-start-guide-r-software-and-data-visualization

更漂亮，更实用：）

P.S。对不起，如果你不使用data.table;我现在不用编码：）