XLPack 7.0
XLPack 数値計算ライブラリ (Excel VBA) リファレンスマニュアル
読み取り中…
検索中…
一致する文字列を見つけられません

◆ Sint1b()

Sub Sint1b ( N As  Long,
R() As  Double,
Wsave() As  Double,
Info As  Long,
Optional Inc As  Long = 1 
)

1次元サイン逆変換

目的
本ルーチンは実数配列中の奇関数列の1次元フーリエ変換を計算する. この変換はフーリエ逆変換あるいはフーリエ合成と呼ばれ, 数列をスペクトル空間から物理空間に変換する.
R(j) = ΣR(k)sin(π(j+1)(k+1)/(N+1)) (Σは k = 0 〜 N-1) (j = 0 〜 N-1)
この変換は正規化されており, Sint1fに続くSint1bの呼び出し(あるいはその逆)により, アルゴリズム上の制約, 丸め誤差などを除き, 元の配列を復元する.
引数
[in]N入力データ列の長さ. (N >= 1) (N+1が小さな素数の積で表されると効率が良い)
[in,out]R()配列 R(LR - 1) (LR >= Inc*(N - 1) + 1)
[in] 入力データ列.
[out] フーリエ逆変換されたデータ列.
[in]Wsave()配列 Wsave(LWsave - 1) (LWsave >= N/2 + N + ln(N)/ln(2) + 4)
作業データ. 入力データ列の長さNごとに, Sint1fあるいはSint1bを最初に呼び出す前にSint1iにより初期化しておかなければならない.
[out]Info= 0: 正常終了.
= -1: パラメータ N の誤り. (N < 1)
= -2: パラメータ R() の誤り. (配列R()の大きさが不足)
= -3: パラメータ Wsave() の誤り. (配列Wsave()の大きさが不足)
= -5: パラメータ Inc の誤り. (Inc < 1)
[in]Inc(省略可)
データ列の連続する要素の配列R()内でのインデックスの間隔. (Inc >= 1) (省略時 = 1)
出典
FFTPACK
使用例
Sint1fの使用例を参照せよ.