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.

Reply via email to