如何在同一张图上绘图以标注制造商的尺寸，颜色和符号？

Question

我试图在3d轴上绘图，例如mtcars，并且我想同时注释由形状，大小和颜色表示的三个属性。似乎plotly已根据遇到的第一个属性对这些变量进行了预分组。到目前为止还没有成功。

mtcars$shape <- rep(c("square", "circle", "diamond"), 11)[-1]
mtcars$color <- rep(c("red", "yellow", "green","black"), 8)
mtcars$size <- 1:32

plot_ly(data = mtcars, x = ~mpg, y = ~cyl, z = ~hp,
        mode = "markers", symbol = ~I(shape), color = ~I(color), size = ~I(cyl))

我想向我展示一个散点图，其中带有正确的注释，指示形状，颜色和大小