[R] Axis Limits in Scatterplot3d

[Uwe Ligges]

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 at 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.