如何更改重要性条的位置以匹配填充比较？

Question

我目前正在使用ggpubr向ggplot2箱图中添加重要性比较。我想做的两件事似乎是我做不到的。

1）我的箱线图当前每个因子有两个比较。我希望能够为我想要的每个比较放置显着性条，第一组比较在箱线图上方，第二组比较在箱线图下方。如图所示，目前两者都在箱线图的顶部彼此堆叠。

2）我想将重要性栏向右或向左移动以匹配框的位置。

我尝试使用position_dodge，就像我在ggplot中一样，但是在这里似乎不起作用。我不太确定如何在ggpubr系统中更改坐标。如果这不起作用，我想我将在ggplot2中使用手动行和文本...

ggplot(df.plot.melt, aes(x = as.factor(TYPE), y = value, fill = variable)) +
  geom_boxplot() + theme_bw() + 
  stat_compare_means(comparisons = list(c("1", "NA"), c("2", "NA")), 
      position = position_dodge(height = 2, width = -0.2)) +
  stat_compare_means(comparisons = 
     list(c("1", "3"), c("1", "NA"), c("2", "3"), c("2", "NA")), 
     position = position_dodge(height = -2, width = 0.2))