n = 1, 2, 3, 1000
A0 + Σ k = 1..∞ (Ak·cos(k·x) + Bk·sin(k·x))
Sopra è descritta una generica serie di Fourier. Verifica che nel caso seguente si ottengono le approssimazioni sotto riprodotte con i polinomi di Fourier indicati:
f <- pi^2/3; for(i in 1:n) f <- f+4*(-1)^i/i^2*cos(i*x)
n = 1, 2, 3, 1000