分组半边小提琴图r代码

下面是分组半边小提琴图的R代码：

# 加载需要的包
library(ggplot2)

# 创建一个示例数据集
data <- data.frame(
  Group = rep(c("A", "B"), each = 50),
  Value = c(rnorm(50, 0, 1), rnorm(50, 2, 1))
)

# 绘制分组半边小提琴图
ggplot(data, aes(x = Group, y = Value, fill = Group)) +
  geom_violin(trim = FALSE, alpha = 0.5) +
  geom_boxplot(width = 0.2, fill = "white", outlier.shape = NA) +
  scale_fill_manual(values = c("blue", "red")) +
  labs(title = "Grouped Half Violin Plot", x = "Group", y = "Value")

这段代码首先创建了一个示例数据集，然后使用ggplot2包中的geom_violin()函数和geom_boxplot()函数绘制了分组半边小提琴图。其中，geom_violin()函数绘制了半边小提琴图，trim = FALSE参数表示不要修剪小提琴图的尾部，alpha = 0.5参数表示小提琴图的透明度为0.5；geom_boxplot()函数绘制了箱线图，width = 0.2参数表示箱线图的宽度为0.2，fill = "white"参数表示箱线图的颜色为白色，outlier.shape = NA参数表示不绘制离群值。最后，使用scale_fill_manual()函数设置小提琴图的填充颜色，labs()函数设置图表的标题、x轴标签和y轴标签。