r - plot3d - 如何更改框颜色并删除轴刻度

Question

我正在尝试对默认的plot3d 对象进行一些视觉修改。具体来说，我想将灯箱颜色作为背景(仅在框中，而不是整个调色板中)并删除轴刻度线(轴上的 x、y、z 值会分散注意力)。我花了无数的时间在谷歌上搜索要改变的选项，但我一生都无法弄清楚这一点。任何帮助将不胜感激。

我将代码缩减为以下内容，以便您可以重新生成它。

library(rgl)

xvar <- c(0.23158792, 0.09686823, -0.58937138, -1.04380419,0.52169760, 1.15218492, 1.36873947,
      -0.91592078, -0.66918513, -0.15279666)
yvar <- c(-1.06993703, 1.51913070 , 1.45069457, -0.78186861, -0.05373430, 0.45442899, 0.04408369,
      -0.31418560, -0.20741901, -1.04119340)
zvar <- c(0.39326652, 0.72391174, -0.07690784, 0.37914638, 0.43709349, -1.28395765, -1.31900029,
      0.52676516, 0.37331202, -0.15362952)
colgroup <- c(2,4,4,2,2,3,3,2,2,2)
brands <- c('a','b','c','d','e','f','g','h','i','j')

plot3d(xvar, yvar, zvar, bbox=TRUE,
   type="s", col=colgroup, 
   size=0.05, alpha=0.50, radius=0.2,
   xlab="Cost Leader", ylab="Performance Leader", zlab="Fashion Leader")
text3d(x = xvar, y = yvar, z = zvar
   text = brands, adj=c(2.5,2.5), cex=0.7)

问题:

1. 如何在 3D 框中添加浅色阴影，使其不是白色

2. 如何删除轴上的 x、y、z 刻度线及其值，以便绘图不那么分散注意力。

提前致谢!

问候， 悉达斯

Answer 1

您可以使用 rgl.bbox 或 bbox3d 函数手动添加边界框:

plot3d(xvar, yvar, zvar, type = 's', col = colgroup, size = 0.05, alpha = 0.50, 
       radius = 0.2, xlab = 'Cost Leader', ylab = 'Performance Leader', 
       zlab = 'Fashion Leader', axes = FALSE)
rgl.bbox(xlen = 0, ylen = 0, zlen = 0, color = c('grey100'))
text3d(x = xvar, y = yvar, z = zvar, text = brands, adj = c(2.5,2.5), cex = 0.7)