R/center.R

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

Try the rainbow package in your browser

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

rainbow documentation built on May 29, 2024, 5:52 a.m.