R可以绘制出3D曲面吗？

Question

我正在尝试使用plotly在R中绘制3D球体，但是我在Python界面中找不到Surface的等效物，这使我可以在其上绘制带有某种颜色图案的球体。

使用R，我设法做到的最好是用mesh3d绘制一个“球体”，但是它并不能解释为表面，而是在不同高度上的不规则条形集合。我也无法使等值面正常工作。

是否未实现Surface，是否有解决方法？

dd <- transform(expand.grid(theta=seq(0,pi,length=100),
                            phi=seq(0,2*pi,length=200)),
x = 0.5*sin(theta)*cos(phi),
y = 0.5*sin(theta)*sin(phi),
z = 0.5*cos(theta)) 

library(plotly)

fig <- plot_ly(data=dd,
               type='mesh3d',
               x = ~x,
               y = ~y,
               z = ~z
)

fig