使用 R plotly 更改 3d 繪圖的標簽

Question

我在 R 中使用 plotly 創建了以下 3d 圖。

 library(plotly)
    library(MASS)
    mu_v=c(0.5,0.4,0.5,0.2)
sigma_m=matrix(data = c(1,0.5,0.7,0.4,0.5,1,0.8,0.9,0.7,0.8,1,0.5,0.4,0.9,0.5,1),nrow = 4,byrow = T)
data1=mvrnorm(  10000,mu = mu_v , Sigma = sigma_m )
data1=as.data.frame(data1)
colnames(data1)=c("X1","X2","X3","X4")
plot_ly(x=~X1, y=~X2, z=~X3, type="scatter3d", color=~(X4), mode="markers",data = data1
          , marker = list(
             size    = 5,
             opacity = 10)) %>% layout(plot_bgcolor = "#bababa")

有沒有辦法改變軸的標簽和着色變量？ 我還可以更改 xy、yz 和 xz 表面的背景並增加繪圖區域嗎？

更新

我嘗試編輯圖例並更改背景顏色，如下所示：

plot_ly(x=~X1, y=~X2, z=~X3, type="scatter3d", color=~(X4), mode="markers",data = data1
          , marker = list(
             size    = 5,
             opacity = 10)) %>% 
  layout(scene = list(legend = list(title = "legend"),plot_bgcolor='#e5ecf6'))

但它沒有工作

Answer 1

這是解決前 2 個問題的選項（更改 x/y/z 軸和顏色圖例標題）。

plot_ly(
    x = ~X1, 
    y = ~X2, 
    z = ~X3, 
    type = "scatter3d", 
    mode = "markers",
    data = data1,
    marker = list(
        color = ~X4, 
        colorbar = list(title = "Legend"),    # Change colour legend title
        colorscale = "Blues",                 # Change colour palette
        size = 5,
        opacity = 10)) %>%
    layout(
        plot_bgcolor = "#bababa",
        scene = list(
            xaxis = list(title = "Axis 1"),   # Change x/y/z axis title
            yaxis = list(title = "Axis 2"),
            zaxis = list(title = "Axis 3")))