R/method_show-Statistic.R

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

setMethod(
    f = "show",
    signature = signature(
        object = "Statistic"
    ),
    definition = function(object) {
    cat("Object of class", dQuote(class(object)), "\n")
        cat(object@description, "\n")
    }
)