R/method_show-Stratification.R

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

setMethod(
    f = "show",
    signature = signature(
        object = "Stratification"
    ),
    definition = function(object) {
    cat("Object of class", dQuote(class(object)), "\n")
        cat("number of strata:", getNumberOfStrata(object), "\n")
    }
)