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

Я хотел бы добавить легенду к моему 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)

r scatter-plot
person Amateur    schedule 28.02.2012    source источник
comment
Вы смотрели виньетку? cran.r-project.org/web/packages/scatterplot3d/ виньетки / s3d.pdf   -  person Roman Luštrik    schedule 28.02.2012
comment
@ Роман: Спасибо. PDF очень полезен, и я понял это !!   -  person Amateur    schedule 28.02.2012
comment
Пожалуйста, опубликуйте пример, который решил вашу проблему.   -  person Roman Luštrik    schedule 28.02.2012

Ответы (1)


arrow_upward
5
arrow_downward

Это старый вопрос. Но у меня была такая же проблема, и я решил ее с помощью следующего кода. У меня есть четыре таймсерии продолжительностью в год на трехмерном сюжете.

Как обычно, я создал такую ​​графику:

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)
person user3793871    schedule 01.07.2014