Alan wrote:
Hi, How do you obtain the limits of the plotting region in a scatterplot3d plot? `par('usr')' does not seem to give sensible values, and that vector only has 4 elements (not the expected 6).
Well, I never designed anything to do that, but it is possible with the following function:
gets3dusr <- function(s3dobject){ es3d <- environment(s3d$points3d) g3d <- function(name) get(name, envir=es3d) c(c(g3d("x.min"), g3d("x.max")) * g3d("x.scal"), c(0, g3d("y.max")) * g3d("y.scal") + g3d("y.add"), c(g3d("z.min"), g3d("z.max")) * g3d("z.scal")) } #Example: s3d <- scatterplot3d(rnorm(5), rnorm(5), rnorm(5)) gets3dusr(s3d) Uwe Ligges
Alan ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.