ggplotly: переименовать подсказку при наведении

Question

У меня есть график, как указано выше.Повторно используемый код, как показано ниже.

plotly::ggplotly(ggplot(dplyr::as_tibble(rnorm(1000)), aes(value)) + stat_ecdf(geom = 'line'))

Я хочу переименовать и отформатировать всплывающую подсказку.Например, ось X или «значение» (на графике) могут иметь значение «Цена за единицу в ฿», а ось Y - это распределение Cumul.

Поэтому, когда я нахожусь на линии, я хочубыть в состоянии увидеть что-то вроде ниже

Cumul Распределение: 78,2%

Цена единицы: ฿ 0,81

Спасибо!

Answer 1

Вот способ.

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) 

Answer 2

Вы можете сюжетно оформить пакет.Вот статья, в которой рассказывается о том, как добавить пользовательскую подсказку Plotly

Хмм, кажется, что изменение aes - единственный способ изменить метки, и он не поддерживает именно то, что выхочу прямо сейчас