r - ggplot boxplot で個々のボックスにラベルを付ける

Question

パワーポイントでこのグラフに重要文字を追加しました。R の各ボックスの上に重要な文字を追加したいと思います。各ボックスの上に文字を含めるように ggplot コードを変更できますか?

コード：

p1 <- ggplot(beta_data, 
             aes(x=reorder(interaction, distwu,FUN = median),
                            y=distwu, fill=interaction)) +
  geom_boxplot()+ 
  theme(legend.position="none", axis.text.x = element_text(angle = 45, hjust = 1))  +
  labs(x="Treatment interaction", y = "Distance to centroid") + 
  ylim(0,1.0)