spc4sts (version 0.2.1)

sms: Spatial Moving Statistic

Description

Computes the spatial moving statistics (SMS) for pixels in a given image.

Usage

sms(img, stat = c("ad", "bp"), w, Fr, gamma = (w + 1)/2)

Arguments

img

the image to compute the SMS for.

stat

the statistic used in the SMS. Must be either "ad" (default) or "bp".

w

the spatial moving window size. Must be an odd number >= 3.

Fr

the reference ecdf with exponential tail approximation (see exptailecdf). Only used when stat = "ad".

gamma

the bandwidth parameter for kerMat. It must be a positive integer and only used when stat = "bp". The default value is recommended.

Value

A matrix containing the SMS values computed for the pixels in img.

References

Bui, A.T., and Apley., D.W. (2017) A Monitoring and Diagnostic Approach for Stochastic Textured Surfaces", Technometrics (in press).

See Also

ad, bp, localStat

Examples

# NOT RUN {
img <- matrix(rnorm(100),10,10)
ms.ad <- sms(img, "ad", 3, exptailecdf(rnorm(1000)))
ms.bp <- sms(img, "bp", 3)
# }