R/center.R

center <- function (ab, k) 
{
    h <- diff(ab)/k
    list(seq(ab[1] + h/2, by = h, length = k))
}

Try the ftsa package in your browser

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

ftsa documentation built on Sept. 11, 2023, 5:09 p.m.