|
-
-
a = 0.0; ←最初は 0 にクリア
b = 0.0;
for ( k=0; k<N; k++ ){
-
a = a + f[k] * cos( 2 * PI * m * k/N );     ← これまでの合計に足していく
b = b + f[k] * sin( 2 * PI * m * k/N );
}            ← それを k=0, 1, 2, ... N-1 までくりかえす
-
a = a * 2 /N; ←最後に (2/N)をかける
b = b * 2 /N;
|
のように書けばいいですね。
|
いろんなm |
m = 1, 2, 3, ... N/2 の場合についても
a1,
a2,
a3, ... をすべて求めたいので、
mについてもループにすればできそうですね。
| |