R/AOQ.R

AOQ <- function (p, n, k, N, type = c("exact", "napprox","ewmaSK","ewma2"),lam=1)
(1 - n/N) * p * OC(p, n, k, type,lam)

Try the LTPDvar package in your browser

Any scripts or data that you put into this service are public.

LTPDvar documentation built on May 1, 2022, 5:07 p.m.