powered by
"SPCCUSUMNonparCenterScale"
new("SPCCUSUMNonparCenterScale", ...)
"SPCCUSUMNonpar"
"SPCCUSUM"
"SPCchart"
SPCCUSUMNonparCenterScale
chartnp <- new("SPCCUSUMNonparCenterScale",Delta=1) X<- rnorm(100) SPCproperty(data=X, nrep=100,property=new("ARLCUSUM",chart=chartnp,threshold=4))
Run the code above in your browser using DataLab