R/method_getCellSize-CompactStratification.R

In spcosa: Spatial Coverage Sampling and Random Sampling from Compact Geographical Strata

setMethod(
    f = "getCellSize",
    signature = signature(
        object = "CompactStratification"
    ),
    definition = function(object) {
        spatialPixelsDataFrame <- suppressWarnings(as(object, "SpatialPixelsDataFrame"))
        cellSize <- getCellSize(spatialPixelsDataFrame)
        cellSize
    }
)