R/cos_basis.R

Defines functions cos_basis

cos_basis = function(q,N){
  basis.matrix = matrix(data = NA, nrow = N, ncol = q)
  s = (1:N-0.5)/N
  for(i in 1:q){
    basis.matrix[,i] = sqrt(2)*cos(i*s*pi)
  }
  return(basis.matrix)
}

Try the nse package in your browser

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

nse documentation built on Feb. 9, 2026, 1:06 a.m.