R/method_getNumberOfStrata-CompactStratification.R

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

setMethod(
    f = "getNumberOfStrata",
    signature = signature(
        object = "CompactStratification"
    ),
    definition = function(object) {
        length(unique(object@stratumId))
    }
)