qcs.cusum(x, ...)
"qcs.cusum"(x, var.index = 1, sample.index = 2, covar.index = NULL, covar.names = NULL, data.name = NULL, sizes = NULL, center = NULL, std.dev = NULL, decision.interval = 5, se.shift = 1, plot = FALSE, ...)
"qcs.cusum"(x, center = NULL, std.dev = NULL, decision.interval = 5, se.shift = 1, plot = FALSE, ...)
library(qcr)
data(pistonrings)
attach(pistonrings)
res.qcd <- qcd(pistonrings, type.data = "dependence")
res.qcs <- qcs.cusum(res.qcd, type = "cusum")
summary(res.qcs)
plot(res.qcs)
Run the code above in your browser using DataLab