用ggpubr包中的ggsummarystats函数绘制双变量分组箱图，并在X轴标签下方添加分组对应的统计值

用ggpubr包中的ggsummarystats函数绘制双变量分组箱图，并在X轴标签下方添加分组对应的统计值

引言：
在数据可视化中，箱图是一种常用的方法，可以同时展示多个分组之间的分布情况和统计特征。R语言中的ggpubr包提供了ggsummarystats函数，可以绘制双变量分组箱图，并在X轴标签下方添加分组对应的统计值，使得数据的可视化更加丰富和直观。本文将详细介绍如何使用ggpubr包中的ggsummarystats函数进行绘图，并提供相应的源代码。

步骤：

1. 安装和加载必要的包
   首先，我们需要安装ggpubr包。可以使用以下代码来安装ggpubr包：

install.packages("ggpubr")

安装完成后，可以使用以下代码加载ggpubr包：

library(ggpubr)

2. 创建示例数据
   为了演示ggsummarystats函数的使用，我们需要创建一些示例数据。假设我们有两个分组（Group A和Group B），每个分组有一组数值型数据。可以使用以下代码创建示例数据：

set.seed(123)
data <- data.frame(
  Group = rep(c("Group A", "Group B"), each = 50),
  Value = c(rnorm(50, mean = 0, sd = 1),
            rn