R/classRaster_as.integer.R

'as.integer.ursaRaster' <- function(x,...) {
   clname <- class(x$value)
   dimx <- dim(x$value)
   x$value <- as.integer(x$value,...)
   ignorevalue(x) <- .optimal.nodata(x) ## added 20161206
   dim(x$value) <- dimx
   class(x$value) <- clname
   x
}
'.is.integer.ursaRaster' <- function(x,...) {
   print("needs Generic")
   NA
}

Try the ursa package in your browser

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

ursa documentation built on June 22, 2024, 6:47 p.m.