傅里葉變換
作者:金字塔 來源:cxh99.com 發布時間:2022年01月27日
-
咨詢內容:
T:=16; //16點信號變換
VARIABLE : x[T]=(15, 32, 9, 222, 118, 151, 5, 7, 56, 233, 56, 121, 235, 89, 98, 111);
VARIABLE : y[T*2]=0; ?//以復數方式返回結果,因此需要2倍容量
If IsLastbar Then
?Begin
? ? ? ? MFFFT(x,y,T,0);
? ? ? ? ? w:2*3.14/T ;
? ? ? ? ?ft1:=0;
? ??
? ? ? ? for j=1 to T do begin
? ? ? ? for i = 0 to T - 1 do begin
? ? ?
ft1:=ft1 + y[i * 2]*cos(i*w * j)/T + y[i * 2 + 1]*sin(i*w*j)/T;
end;
msgout(1,NUMTOSTR(ft1 / T,5));
end;
End
結果 :
2020/08/20 16:30:57 ?5.85846
2020/08/20 16:30:57 ?10.70716
2020/08/20 16:30:57 ?21.31674
2020/08/20 16:30:57 ?24.41963
2020/08/20 16:30:57 ?32.06571
2020/08/20 16:30:57 ?37.75488
2020/08/20 16:30:57 ?41.76019
2020/08/20 16:30:57 ?48.59118
2020/08/20 16:30:57 ?52.76111
2020/08/20 16:30:57 ?58.53273
2020/08/20 16:30:57 ?66.14874
2020/08/20 16:30:57 ?69.21599
2020/08/20 16:30:57 ?79.82165
2020/08/20 16:30:57 ?84.64967
2020/08/20 16:30:57 ?90.49294
2020/08/20 16:30:57 ?97.42217
不太對啊。
?
-
金字塔客服:
?抱歉,這種算法我們也不是很了解的。