ggplot2只显示工具提示中的跟踪而不显示数据。

Question

我已经使用plot1绘图并将其转换为使用ggplotly()的交互式绘图，但当我尝试使用工具提示时，它显示的只是我在原始绘图中使用geom_text绘制的5个矩形的“跟踪1”、“跟踪2”等等。当我悬停在数据点上而不是显示“跟踪1”、“跟踪2”等时，如何获得工具提示来实际显示数据？

这是我的密码：

    plot1 <- ggplot(dfplot, aes(x,y)) + 
      geom_text(aes(x=200, y=min(dfplot[,1]-3), label="Weak"), size=4)+
      geom_text(aes(x=400, y=min(dfplot[,1]-3), label="Strong"), size=4)+
      geom_text(aes(x=600, y=min(dfplot[,1]-3), label="Very Strong"), size=4) + ...
    finalplot1 <- ggplotly(plot1)

我希望巧妙的版本停止在工具提示中说“跟踪1”，并开始显示来自dataframe的x和y坐标值。

Answer 1

下面是规则散点图的例子。

library(ggplot2)
library(plotly)
lol <- ggplot(diamonds,aes(x=carat,y = price)) + geom_point()
ggplotly(lol)

这就是如何自定义tooltip.Remember并添加，tooltip=c("text")，如下所示。

lol2 <- ggplot(diamonds,aes(x=carat,y = price)) + geom_point(aes(text=paste('<br>cut:',cut)))

ggplotly(lol2,tooltip = c("text"))