问题描述
我有一个闪亮的 R 应用程序,在一页上我有一个包含大约 100 个标记的散点图。 我的目标是为每个标记添加一个标签,如下所述https://plotly.com/r/text-and-annotations/ 它有点像,但问题是每个标记的文本大部分时间与其他标记的文本重叠。 经过一些研究,我了解到有像 ggrepel https://ggrepel.slowkow.com/articles/examples.html 这样的软件包可以帮助解决这个问题。 但是,如果我尝试最终将 ggplot 重新转换为 plotly,文本标签就会消失。 我给你举个例子:
df <- data.frame(xvals = rnorm(1:100),yvals = rnorm(1:100),label_var = paste0("label_",as.character(round(rnorm(1:100),3))))
p <- ggplot(df,aes(xvals,yvals,label = label_var)) + geom_point(color = "red")
p2 <- p + geom_text_repel() + labs(title = "geom_text_repel()") # visualize this plot. it's perfect
p3 <- plotly_build(p2) # visualize Now p3,you see the labels have disappeared
我该怎么做才能在我闪亮的应用程序中可视化 p2 中显示的绘图? 谢谢
解决方法
暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!
如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。
小编邮箱:dio#foxmail.com (将#修改为@)