R Plotly 3d跟踪--如何获取新标签（不是x、y、z）

考虑以下示例，该示例取自Plotly：

library(plotly)
# volcano is a numeric matrix that ships with R
p <- plot_ly(z = ~volcano) %>% add_surface()
p

---

我肯定我错过了一些基本的东西，但我被卡住了。热烈欢迎您的帮助。

要扩展用户2510479之前的回答：

  p <- plot_ly(z = ~volcano) %>% add_surface() %>% 
  layout(title = "Layout options in Volcano plot",
  scene = list(
  xaxis = list(title = "Measure1"), 
  yaxis = list(title = "Measure2"), 
  zaxis = list(title = "Measure3")))

  p

可以通过场景和xaxis/yaxis/zaxis标题为Plotly曲面打印设置轴标签

可以通过文本设置hoverinfo，文本必须是与z值具有相同尺寸的数组。hoverinfo需要显示文本才能显示这些值

---

要从用户2510479扩展前面的答案，请执行以下操作：

可以通过场景和xaxis/yaxis/zaxis标题为Plotly曲面打印设置轴标签

可以通过文本设置hoverinfo，文本必须是与z值具有相同尺寸的数组。hoverinfo需要显示文本才能显示这些值

---

这很有帮助，让我走到了一半！跟踪函数呢？鼠标悬停时弹出的框，显示x，y，z坐标？类似这样的：但我不知道如何在R中重现这个……这很有帮助，让我走到了一半！跟踪函数呢？鼠标悬停时弹出的框，显示x，y，z坐标？类似这样的：但我不知道如何在R中重现这个。。。

  p <- plot_ly(z = ~volcano) %>% add_surface() %>% 
  layout(title = "Layout options in Volcano plot",
  scene = list(
  xaxis = list(title = "Measure1"), 
  yaxis = list(title = "Measure2"), 
  zaxis = list(title = "Measure3")))

  p

library(plotly)

txt <- array(dim=dim(volcano))
for (x in 0:dim(volcano)[[2]] - 1) {
  for (y in 0:dim(volcano)[[1]] - 1) {
    txt[1 + x*dim(volcano)[[1]] + y] = paste('Measure1: ', x, '<br />Measure2: ', y, '<br />Measure3: ', volcano[1 + x * dim(volcano)[[1]] + y])
  }
}
p <- plot_ly(z = volcano,
             text = txt,
             hoverinfo = 'text') %>% add_surface()
p <- layout(p, scene = list(xaxis = list(title = "Measure1"), 
                            yaxis = list(title = "Measure2"), 
                            zaxis = list(title = "Measure3")
                            )
            )

p