R/method_initialize-CompactStratificationPriorPoints.R

setMethod(
    f = "initialize",
    signature = signature(
        .Object = "CompactStratificationPriorPoints"
    ),
    definition = function(.Object, cells, stratumId, centroids, mssd, priorPoints) {
        .Object <- callNextMethod(.Object, cells = cells, stratumId = stratumId,
            centroids = centroids, mssd = mssd)
        .Object@priorPoints <- priorPoints
        .Object
    }
)

Try the spcosa package in your browser

Any scripts or data that you put into this service are public.

spcosa documentation built on April 11, 2023, 6:04 p.m.