Question

我想知道是否有办法将标签放在ggplotly()图中的点旁边。如果我在geom_text中使用geom_text_repel或ggplot()，结果就可以了。但是如果我打电话给ggplotly()，我就看不到我创建的标签了。

例如：

require(ggplot)
require(plotly)
x <- c("01/01/2007","04/03/2008","28/11/2008","13/06/2009")
y <- c(25, 50, 75, 100)
x <- as.Date(x, "%d/%m/%Y")
labels <- c("observer1", "observer2", "observer3", "observer4")
x_lab <- "date"
y_lab <- "score"
mydata <- as.data.frame(cbind(x,y))
ggplot(mydata, aes(x=x, y=y)) +
  geom_point() +
  geom_line(col="blue")
ggplotly()

我想＆＃34;标签＆＃34;出现在积分旁边，但我无法找到办法。

提前感谢任何建议。

Answer 1

我知道你知道这个错误在ggplot2中没有发生，它发生在plotly中，因为plotly的功能与ggplot2的功能大不相同ggplot2。并非plotly包中的所有功能都可以传递给plotly。但是，如果您仍然因为其附加功能而对plot_ly()感到痴迷，我强烈建议您使用ggplot()函数创建图而不是require(ggplot) require(plotly) x <- c("01/01/2007","04/03/2008","28/11/2008","13/06/2009") y <- c(25, 50, 75, 100) x <- as.Date(x, "%d/%m/%Y") labels <- c("observer1", "observer2", "observer3", "observer4") x_lab <- "date" y_lab <- "score" mydata <- as.data.frame(cbind(x,y)) plot_ly(mydata, x = ~x, y = ~y, type = 'scatter', mode = 'markers', marker = list(size = 10)) %>% add_annotations(x = mydata$x, y = mydata$y, text = labels)。

我为你提供了一个良好的开端：

CONVERT

此图表的输出位于此链接中 Graph Output from plot_ly function

使用R中的ggplotly（）在绘图中的点旁边的标签

1 个答案: