R/mean.R

Defines functions sum.sdc_raster mean.sdc_raster

#' @export
mean.sdc_raster <- function(x, ...){
  r <- x$value
  r$sum/r$count
}

#' @export
sum.sdc_raster <- function(..., na.rm = TRUE){
  x <- list(...)[[1]]
  x$value$sum
}
edwindj/sdcSpatial documentation built on April 13, 2025, 1:57 a.m.