R/classRaster_dim.R

'dim.ursaRaster' <- function(x) {
   res <- as.array(x,dim=TRUE)
   names(res) <- c("samples","lines","bands")
   res[c(2,1,3)]
}
'dim<-.ursaRaster' <- function(x,value) x

Try the ursa package in your browser

Any scripts or data that you put into this service are public.

ursa documentation built on Oct. 17, 2023, 5:11 p.m.