sms {spc4sts}

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 dimension of the square moving window of the SMS. It 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 is only used when stat = "bp". The default value is recommended.

Value

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

Author(s)

Anh Bui

References

Bui, A.T. and Apley., D.W. (2018a) "A Monitoring and Diagnostic Approach for Stochastic Textured Surfaces", Technometrics, 60, 1-13.

See Also

ad, bp, monitoringStat

Examples

img <- matrix(rnorm(100),10,10)
ms.ad <- sms(img, "ad", 3, exptailecdf(rnorm(1000)))
ms.bp <- sms(img, "bp", 3)