RE: Fouriertransfomation mit Hilfe von Mathematica 4.1

["Nowak Robert" <robert.nowak@XXXXXXX.at>]

funkt doch eh bestens, glaube du hast da runde statt eckige klammern verwendet (vieleicht auch ein problem mit der 
TraditionalForm).

postings am besten mit InputForm (makierst alle zellen und wählst im menue: Cell ConverTo InputForm)

In[50]:=
FourierTransform[Sum[c[k]*Cos[k*w0*t + p[k]], {k, 0, Infinity}], t, w]

Out[50]=
Sum[c[k]*(Sqrt[Pi/2]*DiracDelta[-w + k*w0]*(Cos[p[k]] - I*Sin[p[k]]) + 
    Sqrt[Pi/2]*DiracDelta[w + k*w0]*(Cos[p[k]] + I*Sin[p[k]])), {k, 0, Infinity}]

-----Original Message-----
From: Silke Diedenhofen [mailto:silke.diedenhofen@XXXXXXX.de] 
Sent: Wednesday, July 02, 2003 10:58 AM
To: dmug@XXXXXXX.ch
Subject: Fouriertransfomation mit Hilfe von Mathematica 4.1


Hallo!

Ich habe ein Problem mit der Fouriertransformation. Wenn ich die zu tranformierende Funktion so eingebe, wie es in der 
Hilfe steht, kommt irgendwie nur Mist heraus:

 \!\(FourierTransform[\[Sum]\+\(k = 0\)\%\[Infinity] c\_k\ Cos \((k\ \ \[Omega]\_0\ t\  + \ \[CurlyPhi]\_k)\), \ t, \ 
\[Omega]]\)

Das ist meine Eingabe, allerdings habe ich sie nicht im Kernel eingegeben, sondern in der Graphischen Oberfläche.

Die Ausgabe sieht nun so aus:

 \!\(\*
          RowBox[{
            UnderoverscriptBox["\[Sum]", \(k = 0\),
              InterpretationBox["\[Infinity]",
                DirectedInfinity[ 1]]],
            RowBox[{"Cos", " ", \(c\_k\), " ",
              RowBox[{"(",
                RowBox[{\(\@\(2\ \[Pi]\)\ DiracDelta[\[Omega]]\ \[CurlyPhi]\_k\), "-",

                  RowBox[{
                  "\[ImaginaryI]", " ", "k", " ", \(\@\(2\ \[Pi]\)\),
                    " ", \(\[Omega]\_0\), " ",
                    RowBox[{
                      SuperscriptBox["DiracDelta", "\[Prime]",
                        MultilineFunction->None], "[", "\[Omega]", "]"}]}]}],
                ")"}]}]}]\)

Ganz besonders stört mich daran die Ableitung der Delta-Funktion. Aber auch sonst hat es nicht viel damit zu tun, was 
ich mir als Lösung vorgestellt habe.

Ist das ein simpler Eingabefehler meinerseits, oder funktioniert die Fouriertransformation beim Mathematica 4.1 einfach 
nur nicht?

Danke für eure Hilfe.

Silke