powered by
"hitprobShew"
new("hitprobShew", ...)
"SPChitprob"
"SPCproperty"
calhitprobShew
X <- rnorm(100) chartShew <- new("SPCShewNormalCenterScale") SPCproperty(data=X,nrep=500, property=new("hitprobShew",chart=chartShew,nsteps=100,threshold=4))
Run the code above in your browser using DataLab