как добавить легенду к scatterplot3d в R - PullRequest
Новая
       9

как добавить легенду к scatterplot3d в R

4 голосов
/ 28 февраля 2012

Я хотел бы добавить легенду к моему scatterplot3d. Я создал 3 отдельных графика и наложил их на 1 график, поэтому я не знаю, куда должен идти синтаксис легенды ("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)

1 Ответ

4 голосов
/ 01 июля 2014

Это старый вопрос. Но у меня была та же проблема, и я решил ее с помощью следующего кода. У меня есть четыре серии с продолжительностью года в 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)
...