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)

最小限の ggtree/Newick 例とエントリーポイント plotly::ggplotly(p1) から始め、既存の geom_text の動作と、報告されている geom_text_repel の拒否を比較します。ggplotly がこのユースケースで geom_text_repel を受け入れ、報告されているラベルの重なりの問題を回避できれば完了です。