R/hanning.window.R

hanning.window <- function (n)
  {
    if (n == 1)
      c <- 1
    else
      {
	n <- n-1
	c <- 0.5 - 0.5*cos(2*pi*(0:n)/n)
      }
    return(c)
  }
molnplus/DasProjekt-e1071 documentation built on May 23, 2019, 6:06 a.m.