geom_text_repel has not been yet implemented into plotly

I want to build a phylogenetic tree from a newick file with ggplotly function but as soon as I use geom_text_repel to avoid overlapping between branches and labels, it says that this function is not yet implemented. The geom_text works only by itself but there is a lot of ovelap. Do you know anything that can help instead? Here is a small example.

library(ggtree)
library(plotly)

treefile <- "filename.newick"
tree <- read.tree(treefile)
p1 <- ggtree(tree)
p1 + geom_text_repel()
plotly::ggplotly(p1)

Commencez par l’exemple minimal ggtree/Newick et le point d’entrée plotly::ggplotly(p1), en comparant le comportement existant de geom_text avec le rejet signalé de geom_text_repel. Le travail sera considéré comme terminé lorsque ggplotly acceptera geom_text_repel pour ce cas d’utilisation et évitera le problème signalé de chevauchement des étiquettes.