expect_equal(base::length(fourier_sin_cos(c(1,2,3,4), a=c(2,4,6), b=c(3,5), tau=2)), 4, tolerance=0)