R旋转星号

最近使用R语言作图，发现使用coord_flip()后星号不能旋转到正确的位置，经过一番验证发现可以通过angel参数旋转到正确的角度，之后利用hjust和vjust参数摆放到正确的位置。

像这样：

source("https://gist.githubusercontent.com/benmarwick/2a1bb0133ff568cbe28d/raw/fb53bd97121f7f9ce947837ef1a4c65a73bffb3f/geom_flat_violin.R")

ggplot(df_gather,aes(x=Group,y=Value,fill=Group))+

  geom_flat_violin(position = position_nudge(x=.16),color="black")+

  geom_boxplot(width=0.1,position = position_nudge(x=.16),fill='white',size=0.5,outlier.size = -1)+

  geom_jitter(aes(color=Group),width = 0.1,size=1)+

  geom_signif(comparisons = combn(levels(df_gather$Group), 2, simplify =FALSE),

              step_increase = 0.1,map_signif_level =  c("**"=0.01, "*"=0.05) ,

              test = t.test,size=1,textsize = 6,color="black",angle=270,hjust = -3,vjust = -0.8)+

  scale_y_continuous(limits = c(-7,10))+

  facet_wrap(~gene)+

  coord_flip()+

  theme_test()+

  scale_color_lancet()+

  scale_fill_lancet()