マセマティカで以下のコードを実行したのですが、うまくいきません。
関数ee,ffを求めて、|ee-ff|をtで{0,1}の範囲で積分したいです。
nsb = 5; func1 = Integrate[Exp[(-2*Pi*I*n*t)/T], {t, 0, a*T}]; func2 = Integrate[-Exp[(-2*Pi*I*n*t)/T], {t, a*T, T}]; fourier[n_] := FullSimplify[(func1 + func2)/T]; fourier[n] a = 0.63; fourierList = Table[fourier[n], {n, 1, nsb}]; ampList = Abs[fourierList]/Abs[First[fourierList]] phaseList = Arg[fourierList] freqList = Range[5]; resultList = Sqrt[{6.13289, 0.78231, 0.542887, 1.30755, 0.081394}/6.13289]; ee = Sum[ampList[[j]]*Cos[2*Pi*freqList[[j]]*t + phaseList[[j]]], {j, 1, nsb}] ff = Sum[resultList[[j]]* Cos[2*Pi*freqList[[j]]*t + phaseList[[j]]], {j, 1, nsb}] Integrate[Abs[ee - ff], {t, 0, 1}]
よろしくお願いします。
回答1件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。