Могут ли geom_dotplot и geom_text_repel работать вместе? (Точечный рисунок с надписями.)

#r #ggplot2 #label

Вопрос:

Я хотел бы создать точечную диаграмму с метками, как показано на рисунке.

Однако я не могу geom_text_repel нарисовать линии в правильных положениях, если точки находятся близко друг к другу.

 df=data.frame(name=c("A1","A2","B1","B2","B3"),value=c(1,2,2,2,2),group=c("A","A","B","B","B"))

ggplot(df,aes(x=group,y=value,label=name)) 
  geom_dotplot(df,mapping=aes(x=group,y=value),binaxis='y', stackdir='center', dotsize=1) 
  geom_text_repel(df,mapping=aes(segment.color="red"),box.padding = 1,max.overlaps=10)
 

введите описание изображения здесь