Description Usage Arguments Value Note Examples
View source: R/UnivariateCalibratePerformanceMeasure.R
The methodology used to calibrate the control limit for the SNS chart depending on the selected chart
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25  calibrateControlLimit(
targetARL = NULL,
targetMRL = NULL,
n,
m,
theta = NULL,
Ftheta = NULL,
scoring = "Z",
Chi2corrector = "None",
dist,
mu,
sigma,
dist.par = c(0, 1, 1),
chart,
chart.par,
replicates = 50000,
isParallel = TRUE,
maxIter = 20,
progress = TRUE,
alignment = "unadjusted",
constant = NULL,
absolute = FALSE,
isFixed = FALSE,
rounding.factor = NULL
)

targetARL 
scalar. is the target ARL to calibrate. By default is set to NULL 
targetMRL 
scalar. is the target ARL to calibrate. By default is set to NULL 
n 
scalar. Subroup size 
m 
scalar. Reference sample size 
theta 
scalar. Value corresponig with the 
Ftheta 
scalar. Quantile of the data distribution. The values that take are between (0,1). 
scoring 
character string. If "Z" (normal scores) (default). If "ZSQ" (normal scores squared). 
Chi2corrector 
character string. Only when scoring is ZSQ. Select from
If "approx" () (default). If "exact" (normal scores squared). 
dist 
character string. Select from:

mu 
vector. Two elements, the first one is the mean of the reference sample and the second one is the mean of the monitoring sample. 
sigma 
vector. Two elements, the first one is the sd of the reference sample and the second one is the sd of the monitoring sample. 
dist.par 
vector. Distribution parameters. 
chart 
character string. Selected type of chart. Three options are available: Shewhart, CUSUM, EWMA 
chart.par 
vector. The size depends on the selected chart:

replicates 
scalar. Number of replicates to get the ARL 
isParallel 
logical. If 
maxIter 
scalar. is a numeric. The maximum number of iteration to take the calibration before stops 
progress 
logical. If 
alignment 
character string. Aligment of the data

constant 
scalar. Only used when the 
absolute 
logical. If 
isFixed 
logical. If 
rounding.factor 
scalar. positive value that determine the range between two consecutive rounded values. 
Multiple output. Select by output$
objective.function
: scalar. The best solution obtained, in terms of the target ARL or MRL
par.value
: scalar. Which parameter of the chart reach this best solution
iter
: scalar. In which iteration is found the objective function.
found
: boolean. Is TRUE if in the maxIter
is reached the desired +5
The argument chart.par
in this function correspond to the initial parameters to start the calibration.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38  n < 2 # subgroup size
m < 30 # referencesample size
dist < "Normal" # distribution
mu < c(0, 0) # c(reference sample mean, monitoring sample mean)
sigma < c(1, 1) # c(reference sample sd, monitoring sample sd)
#### Distribution parameters
dist.par < c(0, 1) # c(location, scale)
#### Other Parameters
replicates < 2
targetARL < 370
isParallel = FALSE
#### Control chart parameters
chart < "Shewhart"
chart.par < c(3)
shewhart < calibrateControlLimit(
targetARL = targetARL, targetMRL = NULL, n = n, m = m, theta = NULL,
Ftheta = NULL, dist = dist, mu = mu, sigma = sigma, dist.par = dist.par, chart.par = chart.par,
replicates = replicates, chart = chart, isParallel = isParallel
)
chart < "CUSUM"
chart.par < c(0.5, 2.5, 3)
cusum < calibrateControlLimit(
targetARL = targetARL, targetMRL = NULL, n = n, m = m, theta = NULL,
Ftheta = NULL, dist = dist, mu = mu, sigma = sigma, dist.par = dist.par, chart.par = chart.par,
replicates = replicates, chart = chart, isParallel = isParallel
)
chart < "EWMA"
chart.par < c(0.2, 2.962)
ewma < calibrateControlLimit(
targetARL = targetARL, targetMRL = NULL, n = n, m = m, theta = NULL,
Ftheta = NULL, dist = dist, mu = mu, sigma = sigma, dist.par = dist.par, chart.par = chart.par,
replicates = replicates, chart = chart, isParallel = isParallel
)

Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.