如何用R为基数在小提琴曲线图中求平均值

# 安装和加载所需的库
install.packages("ggplot2")
library(ggplot2)

# 准备数据集
data <- read.csv("data.csv")  # 假设数据集保存在data.csv文件中
values <- data$column_name  # 替换column_name为实际数据集中的数值列名

# 创建小提琴图
violin_plot <- ggplot(data, aes(x = group_column, y = values)) +
               geom_violin()

# 计算平均值
mean_value <- mean(values)

# 添加平均值标记
violin_plot <- violin_plot +
               geom_point(aes(x = mean_value, y = 0), color = "red", size = 3)

# 显示小提琴曲线图
print(violin_plot)