r - 如何在R中向scatterplot3d添加图例

Question

我想向我的 scatterplot3d 添加图例。我创建了 3 个单独的图并将它们叠加到 1 个图中，所以我不知道 legend("topleft",inset=0.5) 的语法应该放在哪里

Plot <-scatterplot3d(data$Size,data$Pct,data$bias1, type='h', zlim=c(-20,100), xlab="size", ylab= "Percent", zlab="Bias")

Plot$points3d (data$Size,data$Pct,data$Bias2,
  col="blue", type="h", pch=15, cex=.6)  

Plot$points3d(data$Size,data$Pct,data$Bias3,
  col="red", type="h", pch=4, cex=.6)  

Answer 1

这是一个老问题了。但我遇到了同样的问题并用以下代码解决了它。我在 3D 图中有四个持续时间为一年的时间序列。

像往常一样，我创建了这样的图形:

s3d <- scatterplot3d(...)

然后添加如下图例:

legend(s3d$xyz.convert(18, 0, 12), col= c("green","blue", "red", "black"), bg="white", lty=c(1,1), lwd=2, yjust=0, legend = c("2010", "2011", "2012", "Prognose für 2013"), cex = 1.1)