powered by
mpcv
print
"mpcv"
"print"(x, ...)
CpV
PS
PD
data(industrial) x <- industrial$x LSL <- industrial$LSL USL <- industrial$USL Target<- industrial$Target res.ind <- mpcv(x, LSL=LSL, USL=USL, Target=Target, alpha=0.025) print(res.ind)
Run the code above in your browser using DataLab