Wednesday, May 22, 2013

RG #110: 3D scatter plot with multiple series in Y axis

X = seq(1, 100, 5)
Y = seq (1, 100, 5)
Z = rnorm (length (X), 10, 2)
data1 <- data.frame (X, Y, )
data2 <- data.frame (X, Y, Z1 = Z - 5)
data3 <- data.frame (X, Y, Z1 = Z - 3)

require(scatterplot3d)
s3d <- scatterplot3d(data1, color = "blue", pch = 19, xlim=NULL, ylim=NULL, zlim= c(0, 20))
s3d$points3d(data2, col = "red", pch = 18)
s3d$points3d(data3, col = "green4", pch = 17)


 

at

1 comment:

  1. jrkrideauJanuary 24, 2014 at 10:23 AM

    Note however there is a typo in the script.
    data1 <- data.frame (X, Y, ) should read
    data1 <- data.frame (X, Y)

    ReplyDelete

Note: Only a member of this blog may post a comment.