ggplotly:在悬停时重命名工具提示

时间:2019-09-28 09:40:06

标签: r ggplot2 plotly r-plotly ggplotly

enter image description here

我有一个上面的图表。可重复使用的代码如下。

else
{
    Console.WriteLine("Email for " + email + " was NOT found in the table..." + ex.Message);
    return false;
}

我想重命名悬停时的工具提示并设置其格式。 例如,x轴或“值”(在图表中)可以是“以฿为单位的单价”,而y轴是Cumul分布。

因此,当我将鼠标悬停在线路上时,我希望能够看到类似下面的内容

  

累积分布:78.2%

     

单价:฿0.81

谢谢!

2 个答案:

答案 0 :(得分:4)

这是一种方法。

library(plotly)
library(scales) # for the number() function

gg <- ggplot(dplyr::as_tibble(rnorm(1000)), aes(value)) + 
  stat_ecdf(geom = 'line')

ggly <- ggplotly(gg)

text_x <- number(
  ggly$x$data[[1]]$x,
  prefix = "Unit Price: $",
  accuracy = 0.01
)

text_y <- number(
  ggly$x$data[[1]]$y,
  scale = 100,
  accuracy = 0.1,
  prefix = "Cumul. distribution: ",
  suffix = "%"
)

ggly %>%
  style(text = paste0(text_x, "</br></br>", text_y), traces = 1) 

enter image description here

答案 1 :(得分:1)

您可以密谋打包。这是一篇文章,告诉您如何添加自定义工具提示Plotly

嗯,改变es似乎是我们修改标签的唯一方法,它不完全支持您现在想要的