如何在R语言Plotly 3D散点图中实现坐标轴居中？

直接利用Plotly原生的坐标轴配置即可实现需求，无需通过trace模拟轴（避免丢失标签）。核心思路是开启原生中心零轴线，同时关闭网格、刻度，调整轴标签位置。

完整修改代码 #

coords = list("x"=c(), "y"=c(), "z"=c())
for(phi in seq(0, 2*pi, 0.2)) {
  for(theta in seq(0, pi, 0.2)) {
    x = (8 * sin(theta) * cos(phi))
    y = (8 * sin(theta) * sin(phi))
    z = (8 * cos(theta))
    coords$x = append(coords$x, x)
    coords$y = append(coords$y, y)
    coords$z = append(coords$z, z)
  }
}
df = data.frame("x"=coords$x, "y"=coords$y, "z"=coords$z)

fig = plot_ly(df, x=~x, y=~y, z=~z, type="scatter3d",
              mode="markers", marker=list(size=3))

# 关键布局配置
fig = layout(fig, 
             scene=list(
               # 设置场景纯白背景
               bgcolor = "white",
               # X轴配置
               xaxis=list(
                 range=c(-12, 12),
                 showgrid = FALSE,       # 移除网格线
                 showticklabels = FALSE, # 移除刻度标签
                 zeroline = TRUE,        # 显示中心零轴线（核心：实现中心轴）
                 zerolinewidth = 2,      # 调整轴的粗细
                 zerolinecolor = "#000", # 设置轴的颜色
                 # 调整X轴标签位置
                 title = list(
                   text = "X",
                   font = list(size=14),
                   standoff = 20 # 控制标签与轴的距离
                 )
               ),
               # Y轴配置
               yaxis=list(
                 range=c(-12, 12),
                 showgrid = FALSE,
                 showticklabels = FALSE,
                 zeroline = TRUE,
                 zerolinewidth = 2,
                 zerolinecolor = "#000",
                 title = list(
                   text = "Y",
                   font = list(size=14),
                   standoff = 20
                 )
               ),
               # Z轴配置
               zaxis=list(
                 range=c(-12, 12),
                 showgrid = FALSE,
                 showticklabels = FALSE,
                 zeroline = TRUE,
                 zerolinewidth = 2,
                 zerolinecolor = "#000",
                 title = list(
                   text = "Z",
                   font = list(size=14),
                   standoff = 20
                 )
               )
             )
)
fig

核心配置说明 #

1. 中心轴实现：通过zeroline = TRUE启用Plotly原生的中心零轴线，无需额外模拟轴，自然保留原生轴标签。
2. 清除冗余元素：showgrid = FALSE关闭网格线，showticklabels = FALSE隐藏刻度标签，彻底移除不必要的背景元素。
3. 样式优化：zerolinewidth和zerolinecolor调整中心轴的粗细与颜色，让轴更醒目；title$standoff控制轴标签与中心轴的距离，确保标签在轴末端清晰显示。
4. 背景调整：scene$bgcolor = "white"将场景背景设为纯白，进一步贴合目标效果。

内容的提问来源于stack exchange，提问作者dark-walrus