R Shiny Plotly 3D：将 x ， y ， z 轴的标题更改为实际变量名称并添加图例标题

Question

我在 R shiny App 上使用 plotly() 创建了一个 3D 散点图。代码如下：

output$threeDscatterPlot <- renderPlotly({
    data <- dataInput()$data
      plot.obj <<-list() 
      plot.obj$data <<- data 
      var7 <<- with(plot.obj$data,get(input$variable7)) 
      var8 <<- with(plot.obj$data,get(input$variable8)) 
      var9 <<- with(plot.obj$data,get(input$variable9)) 
      var10 <<- with(plot.obj$data,get(input$variable10)) 
      var10 <-  as.factor(var10)
      print(names(plot.obj$data))
p <- plot_ly(plot.obj$data, x = var7, y = var8 , z = var9 , type = "scatter3d", mode = "markers" , 
              color = var10 , colors = "Paired" ) 
       p %>%  layout(legend = list(x = 1, y = 0.5 , bgcolor = "#E2E2E2"))

 })

var7、var8、var9 是连续变量和 var 10（分类变量。

3D 绘图非常清晰，但 xaxis 标签、yaxis 标签和 zaxis 标签作为 var 7、var8、var 9

我的问题是：我们如何将 x 、 y 、 z 轴的标题更改为 var7/8/9 的实际变量名称，如 dataset/dataframe 中那样？我尝试使用 xaxis .zaxis , yaxis 但它似乎不起作用我们如何在图例上方添加图例标题？

全部在 R Shiny App 中完成

提前致谢

Answer 1

将以下内容添加到您的布局对象中：

layout(scene = list(xaxis = list(title = 'your title')))

更多信息在这里：https://plot.ly/r/reference/#layout-scene-xaxis-title

R Shiny Plotly 3D：将 x ， y ， z 轴的标题更改为实际变量名称并添加图例标题

R Shiny Plotly 3D : Change the title of x , y , z axis to actual variable name and add legend title

r

3d

shiny

plotly

r-plotly