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

◆ Ztrsen()

Sub Ztrsen ( Job As  String,
Compq As  String,
Selct() As  Boolean,
N As  Long,
T() As  Complex,
Q() As  Complex,
W() As  Complex,
M As  Long,
S As  Double,
Sep As  Double,
Info As  Long 
)

シュール分解の並べ替えおよび固有値群・不変部分空間の条件数 (複素行列)

目的
本ルーチンは, 選択された固有値群が上三角行列 T の対角要素の先頭部分に来て Q の先頭部分の列が対応する右不変部分空間の直交基底を形成するように, 複素行列のシュール分解 A = Q*T*Q^H の並べ替えを行う.

必要に応じて, 固有値群および/または不変部分空間の条件数の逆数を求めることができる.
引数
[in]Job固有値群の条件数(S)あるいは不変部分空間の条件数(Sep)が必要かどうか指定する.
= "N": 不要.
= "E": 固有値群のみ必要(S).
= "V": 不変部分空間のみ必要(Sep).
= "B": 固有値群と不変部分空間の両方必要(S および Sep).
[in]Compq= "V": シュールベクトルからなる行列 Q を更新する.
= "N": Q を更新しない.
[in,out]Selct()配列 Selct(LSelct - 1) (LSelct >= N)
Selct() は選択されたクラスタの固有値を指定する. j 番目の固有値を選択するためには Selct(j) を True に設定しなければならない.
[in]N行列 T の行および列数. (N >= 0) (N = 0 の場合, 処理を行わずに戻る)
[in]T()配列 T(LT1 - 1, LT2 - 1) (LT1 >= N, LT2 >= N)
[in] 上三角行列 T.
[out] 選択された固有値が対角要素の先頭部分に来るように並べ替えた後の行列 T で上書きされる.
[in,out]Q()配列 Q(LQ1 - 1, LQ2 - 1) (LQ1 >= N, LQ2 >= N)
Compq = "V" の場合,
[in] シュールベクトルからなる行列 Q.
[out] T を並べ替えるユニタリ変換行列を Q に右から乗じる. Q の先頭部分の M 列が選択された不変部分空間の正規直交基底を形成する
Compq = "N" の場合, Q() は参照されない.
[out]W()配列 W(LW - 1) (LW >= N)
T の並べ替え後の固有値. T の対角要素に現れるのと同じ順に格納される.
[out]M指定された不変部分空間の次数. (0 < = M <= N)
[out]SJob = "E" または "B" の場合, S は選択された固有値群の条件数の逆数の下限である. S は sqrt(N) の程度よりも真の条件数の逆数より小さい推定値になることはない. M = 0 または N であれば S = 1 となる.
Job = "N" または "V" の場合, S は参照されない.
[out]SepJob = "V" または "B" の場合, Sep は指定された不変部分空間の条件数の逆数の推定値である. M = 0 または N であれば Sep = norm(T) となる.
Job = "N" または "E" の場合, Sep は参照されない.
[out]Info= 0: 正常終了.
= -1: パラメータ Job の誤り. (Job <> "N", "E", "V" および "B")
= -2: パラメータ Compq の誤り. (Compq <> "V" および "N")
= -3: パラメータ Selct() の誤り.
= -4: パラメータ N の誤り. (N < 0)
= -5: パラメータ T() の誤り.
= -6: パラメータ Q() の誤り.
= -7: パラメータ W() の誤り.
詳細
本ルーチンは, 最初にユニタリ変換 Z を計算して選択された固有値を収集し, それらを T の左上隅に移動する. すなわち, 選択された固有値は次の T11 の固有値である.
Z^H * T * Z = ( T11 T12 ) n1
( 0 T22 ) n2
n1 n2
ただし, N = n1 + n2 である. Z のはじめの n1 列は T の指定された不変部分空間を張る.

T が行列 A のシュール分解 A = Q*T*Q^H から得られた場合, A の並べ替えられたシュール分解は A =(Q*Z)*(Z^H*T*Z)*(Q*Z)^H で与えられる. Q*Z のはじめの n1 列は A の対応する不変部分空間を張る.

T11 の固有値の平均の条件数の逆数を S に返すことができる. S は 0 (非常に悪条件) と 1 (非常に良条件) の間にあり次のように計算される. まず, T11 に関連付けられた不変部分空間上の射影が次のように表されるような R を求める.
P = ( I R ) n1
( 0 0 ) n2
n1 n2
R は次のシルベスター方程式の解である.
T11*R - R*T22 = T12.
F-norm(M) が M のフロベニウスノルムを表し, 2-norm(M) が M の2-ノルムを表すものとすると, S は 2-norm(P) の逆数(真の条件数の逆数)の下限値として求められる.
(1 + F-norm(R)^2)^(-1/2)
S は sqrt(N) の程度よりも 1 / 2-norm(P) を小さく見積もることはない.

T11 の固有値の平均の計算値の誤差限界の近似値は次のとおりである.
eps * norm(T) / S
ここで, eps はマシンイプシロンである.

Z (または Q*Z) のはじめの n1 列によって張られる右不変部分空間の条件数の逆数が Sep に返される. Sep は T11 と T22 の距離として定義される.
Sep( T11, T22 ) = sigma-min( C )
ここで, sigma-min(C) は n1*n2 x n1*n2 行列の最小の特異値である.
C = kprod( I(n2), T11 ) - kprod( T22^H, I(n1) )
I(M) は M x M 単位行列で, kprod はクロネッカー積を表す. sigma-min(C) を C^(-1) の 1-ノルムの推定値の逆数で推定する. C^(-1) の 1-ノルムの逆数の真の値は sigma-min(C) から sqrt(n1*n2) 程度以下しか違わない.

Sep が小さい場合, T の小さな変化が不変部分空間の大きな変化を引き起こすことがある. 右不変部分空間の計算値の最大角度誤差限界の近似値は次のように与えられる.
eps * norm(T) / Sep(i)
出典
LAPACK