R/getmode.R

Defines functions getmode

getmode <- function(v)
{
     uniqv <- unique(v)
     uniqv[which.max(tabulate(match(v, uniqv)))]
}

Try the ftsa package in your browser

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

ftsa documentation built on May 29, 2024, 2:47 a.m.