小编plo*_*ser的帖子

我想绘制一个带有Plotly的3D-Line Plot用于时间序列并填充每一行.我这里有一个示例代码.

library(plotly)

dens <- with(diamonds, tapply(price, INDEX = cut, density))
data <- data.frame(
  x = unlist(lapply(dens, "[[", "x")),
  y = unlist(lapply(dens, "[[", "y")),
  cut = rep(names(dens), each = length(dens[[1]]$x)))

p <- plot_ly(data, x = ~cut, y = ~x, z = ~y, type = 'scatter3d', mode = 'lines', color = ~cut)
p

用这个代码我可以产生这个图

没有填充的3d线图

我已经尝试过surfaceaxis=0,1或2,他们产生错误的填充物.

3D-Plotly错误填充

我想要的是填充x轴和线图之间的区域.

有一个示例3D图与另一个值.

作为示例3D-Plot,在曲线下填充另一个值

有人可以建议一个方法吗？先感谢您.

编辑:必须使用"plotly"包创建