Изменить информацию всплывающей подсказки для графического графика, созданного с помощью ggplotly

Question

У меня есть этот набор данных и соответствующие им x и y после того, как я запустил свой собственный алгоритм кластеризации, и я хочу, чтобы его можно было проанализировать в интерактивном режиме.

value max_value Var1 x y 3 6 potato 4 2 4 4 banana 3 2 5 6 apple 3 1

I 'Я пытаюсь использовать plotly, и я хотел бы, чтобы средство просмотра plotly показывало мне только значение и значение max_value во всплывающей подсказке / hoverinfo соответствующей точки.Это то, что у меня есть до сих пор:

gg <- ggplot(test) + 
  geom_point(aes(x = x,y =  y, color = Var1), size = 4, alpha = 0.5)
ggplotly(gg)

#alternative
plot_ly(df, x = ~x, y = ~y, color = ~Var1)

Есть ли способ изменить значения, отображаемые на графике во всплывающей подсказке или другом пакете, который может помочь мне в этом?

Answer 1

Простое решение для отображения max_value во всплывающей информации plotly:

gg <- ggplot(test) + 
  geom_point(aes(x = x,y =  y, color = Var1, group = max_value), size = 4, alpha = 0.5)
ggplotly(gg)

Теперь, когда вы убедились, что max_value передается в ggplotly, вы можете контролировать то, что показано вот так:

ggplotly(gg, tooltip = c("x","y","max_value"))

Создание графика непосредственно через интерфейс plotly, конечно, еще одна возможность:

plot_ly(test, type = 'scatter', mode = 'markers') %>% 
  add_trace(x =~x, y =~y, color = ~Var1, 
            text = ~paste0('X Value: ', x, '\nY Value: ', y, '\n max_value: ',     max_value), 
            hoverinfo = 'text')

Более глубокое погружение в ggplotly можно найти здесь

Answer 2

Вы можете добавить информацию всплывающей подсказки с помощью text эстетики:

library(plotly)
gg <- ggplot(test) + 
  geom_point(aes(x = x, y = y, color = Var1, 
                 text = paste0("Value: ", value, "</br>Max: ", max_value)), 
             size = 4, alpha = 0.5)
ggplotly(gg)

Если вы хотите только value и max_value:

gg <- ggplot(test) + 
  geom_point(aes(x = x, y = y, color = Var1, 
                 text = paste0("Value: ", value, "</br></br>Max: ", max_value)), 
             size = 4, alpha = 0.5)
ggplotly(gg, tooltip = "text")