Hi,
I have the function:
restart: with(plots): with(OrthogonalExpansions): with(DiscreteTransforms):
f:=t->piecewise(t<0,0,t<1,t,t<2,2-t,0);
The Fourier coefficients a[0], a[i] and b[i] can be calculated by:
T:=2: Trig:=FourierSeries(f(t),t=0..T,n,'Coefficients');
a[0]:= op(1, Coefficients);a[i]:= op(1, op(2, Coefficients))[1];b[i]:= op(1, op(2, Coefficients))[2];
I want to calculate those coefficients a[0...