powered by
"calARLShew"
new("calARLShew", ...)
"SPCcalARL"
"SPCproperty"
ARLShew
X<-rnorm(100) chartShew <- new("SPCShewNormalCenterScale") SPCproperty(data=X,nrep=500, property=new("calARLShew",chart=chartShew,target=1000))
Run the code above in your browser using DataLab