On 2/27/2011 7:55 AM, Animesh Pandey wrote:
> I have been stuck on finding the fourier series of a square wave using symbolic toolbox ....
> yet i have jus been able to plot the square wave !!!!
> Please give a hint or a code snippet or anything helpful by which I could start !!!
> ASAP
> Thnx !!!
I looked at the symbolic toolbox help, and I did not find a
command to do what you want. I think the Maple extended symbolic
toolbox might do it, but not sure now. I only have the basic
syms.
I know that Mathematica has such a command. Try Wolfram ALpha web
site, it is free, may be it will accept the command you type becuase it
does accept many Mathematica commands. SOmething to try.
The command I did now on my PC to find FourierSeries, 2 terms
is the following:
In[7]:= FourierSeries[SquareWave[x],x,2]//Simplify//ExpToTrig
Out[7]= (1/(2 \[Pi]))I (1Cos[1/2]+Cos[2]Cos[5/2]+Cos[3]Cos[9/2]+
Cos[5]I Sin[1/2]+I Sin[2]I Sin[5/2]+I Sin[3]I Sin[9/2]+I Sin[5]) (Cos[2 (3+x)]
I Sin[2 (3+x)]) (1Cos[1/2]+Cos[3]+2 Cos[7/2]+Cos[4]Cos[13/2]Cos[7]+Cos[4 x]+
2 Cos[3 (1+x)]Cos[4 (1+x)]2 Cos[3+x]2 Cos[4+x]+2 Cos[4+3 x]+Cos[1/2+4 x]
Cos[3+4 x]2 Cos[7/2+4 x]+Cos[13/2+4 x]+Cos[7+4 x]I Sin[1/2]+I Sin[3]+
2 I Sin[7/2]+I Sin[4]I Sin[13/2]I Sin[7]+I Sin[4 x]+2 I Sin[3 (1+x)]
I Sin[4 (1+x)]2 I Sin[3+x]2 I Sin[4+x]+2 I Sin[4+3 x]+I Sin[1/2+4 x]
I Sin[3+4 x]2 I Sin[7/2+4 x]+I Sin[13/2+4 x]+I Sin[7+4 x])
So, type the above command on that website to see if it will work.
good luck,
Nasser
