cusum_control_median

cusum_control_median( x, target = NULL, std_dev = NULL, desired_shift = 1, k = 0.5, h = 4 )

x | input vector |
---|---|

target | target value for comparison, the median of x will be used if missing |

std_dev | Defaults to the screened moving range of x. A known or desired value for standard deviation can be supplied instead. |

desired_shift | how many standard deviations do you want to detect? This value is typically between 0.5 to 1. Defaults to 1. |

k | allowable slack - defaults to half the standard deviation multiplied by desired shift |

h | action limits - usually between 4 and 5, defaults to 4. The standard deviation is multiplied by this value to determine the upper and lower limits on the chart |

data.frame showing original inputs and calculated control limits

test_vec3 <- c(1,1,2,3,5,7,11,7,5,7,8,9,5) controls <- cusum_control_median(test_vec3, target = 4) controls_median <- cusum_control_median(test_vec3) #> no target value supplied, so using the median of x