Блог

Итак, я создаю 3D-график с помощью plotly, используя оси x, y и z. Я бы хотел, чтобы это был интерактивный график, чтобы я мог смотреть на него со всех сторон, и пока все хорошо, потому что он работает. Однако сейчас я пытаюсь вставить текст в график, который будет служить для выделения некоторых точек данных, которые там находятся, путем добавления числа над самим маркером.

Я просматривал веб-страницы, чтобы узнать, как мне следует поступить, и наткнулся на add_annotations, но я не могу заставить его работать. Мой код приведен ниже. Кто-нибудь знает, как я могу это сделать? В идеале я хотел бы дать R координаты X, Y и Z для текста и просто добавить, как если бы они были маркерами.

 plot_ly(data, x = ~age, y = ~height, z = ~weight,
        marker = list(symbol = "", line = list(color = 'rgb(0,0,0)', width = 2))) %>%
add_markers() %>%
add_annotations(list(y = 0.5, x = 0.5, text = "annotation"))
  

 library(plotly)
plot_ly(data=mtcars, x = ~mpg, y = ~hp, z = ~drat, mode="markers", type="scatter3d", 
        marker = list(symbol = "", line = list(color = 'rgb(0,0,0)', width = 2))) %>%
add_trace(x = mean(mtcars$mpg), y = mean(mtcars$hp), z=mean(mtcars$drat), 
          type = "scatter3d", mode="text", text = "annotation", inherit=FALSE)