R 在一个箱线图中绘制多个变量

我有一个4*10的数据表，如下所示：

Total, var1, var2, var3 
104, 35, 33, 36
106, 38, 32, 36
93, 34, 27, 32
98, 31, 32, 35
101, 34, 32, 35
106, 38, 32, 36
82, 32, 23, 27
100, 38, 30, 32
111, 34, 39, 38
89, 35, 27, 27

我想制作一个

箱线图

，其中每一列都作为一个单独的箱线图绘制，但在同一个图形上。理想情况下，我还希望对这些点进行颜色编码，并添加一些

抖动

，以显示各个数据点

到目前为止，我已经尝试在

重塑2

上使用melt功能，但运气不太好

---

我希望这是清楚的，这让我很头疼。感谢您对以下数据的帮助

：

> head(data)
  Total var1 var2 var3
1   104   35   33   36
2   106   38   32   36
3    93   34   27   32
4    98   31   32   35
5   101   34   32   35
6   106   38   32   36

然后这一位

ggplot2

：

library(ggplot2)
ggplot(reshape2::melt(data), aes(x=variable, y=value, col=variable)) + geom_boxplot() + geom_jitter(height=0,col="black")

让你：

---

我不认为在位置和轴标签足够的情况下给东西上色有什么意义，但不管怎样。此外，如果您也通过变量为点上色，则会丢失它们与箱线图的对比，因此我将它们保留为黑色。

谢谢。我同意这里的颜色似乎有点毫无意义，但这是为了保持这个情节与我的其他情节相似。