これまでn元連立1次方程式 を直接法,反復法などで解くことだけを考えてきた. それでは実際の問題ではこのような線形システムはどのように扱われるだろうか. たとえば,制御の分野ではシステムの状態変化を捉えるために用いている. 係数行列Aがシステム内部を表し,右辺の定数ベクトルbで外乱などの状態を表す. システム内部が変わらず,外の状態が様々に変化したときの状態を知りたいとき, 係数行列Aは変化せず,bのみが変わるだけである. このように係数行列が固定で右辺の定数ベクトルだけが変化するということは, 物理学などの他の分野でも多くある. このとき,係数行列Aを解きやすい形に分解しておけば,計算量を大幅に減らすことができる. ここではそのような分解の一つであるLU分解について述べる. n元連立1次方程式の係数行列を考える. これを以下の下三角行列(lower triangular matrix) L と 上三角行列 (upper triangular matrix) U に分解する. ここで,である. このように分解することをLU分解と呼ぶ. LU分解した行列で連立1次方程式を解くことを考える. まず,より, とすると, となる.Lは下三角行列であるので,1行目から順番に代入していくことで, 容易にを算出することができる.この処理を前進代入(forward substitution)と呼ぶ. が求まったらそれを2番目の式に代入する. Uは上三角行列であるので,ガウスの消去法と同じく後退代入(backward substitution) していくことで解を求めることができる. LU分解の手順†係数行列AをLU分解するためには,以下の式を1行目から順番に適用していく. メモリを節約するために,LU分解した結果を以下のように1つの行列に格納する. LU分解の実装†LU分解をC++で実装した例を以下に示す. /*! * LU分解(ピボット交換なし) * - 行列A(n×n)を下三角行列(L:Lower triangular matrix)と上三角行列(U:Upper triangular matrix)に分解する * - L: i >= j, U: i < j の要素が非ゼロでUの対角成分は1 * - LとUを一つの行列にまとめた形で結果を返す * @param[inout] A n×nの係数行列.LU分解した結果を格納する. * @param[in] n 行列の大きさ * @return 1:成功,0:失敗 */ int LUDecomp(vector< vector<double> > &A, int n) { if(n <= 0) return 0; for(int i = 0; i < n; ++i){ // l_ijの計算(i >= j) for(int j = 0; j <= i; ++j){ double lu = A[i][j]; for(int k = 0; k < j; ++k){ lu -= A[i][k]*A[k][j]; // l_ik * u_kj } A[i][j] = lu; } // u_ijの計算(i < j) for(int j = i+1; j < n; ++j){ double lu = A[i][j]; for(int k = 0; k < i; ++k){ lu -= A[i][k]*A[k][j]; // l_ik * u_kj } A[i][j] = lu/A[i][i]; } } return 1; } LU分解で連立1次方程式を解く手順†LU分解で連立1次方程式を解く方法は上でも述べたがここではより具体的な手順について説明する. LU分解で連立1次方程式を解く手順は以下である.
LU分解を用いた連立1次方程式の解法の実装†LU分解で連立1次方程式を解くコードをC++で実装した例を以下に示す. /*! * LU分解した行列a(n×n)から前進代入・後退代入によりA・x=bを解く * @param[in] A LU分解された行列 * @param[in] b 右辺ベクトル * @param[out] x 結果ベクトル * @param[in] n 行列の大きさ * @return 1:成功,0:失敗 */ int LUSolver(const vector< vector<double> > &A, const vector<double> &b, vector<double> &x, int n) { if(n <= 0) return 0; // 前進代入(forward substitution) // LY=bからYを計算 for(int i = 0; i < n; ++i){ double bly = b[i]; for(int j = 0; j < i; ++j){ bly -= A[i][j]*x[j]; } x[i] = bly/A[i][i]; } // 後退代入(back substitution) // UX=YからXを計算 for(int i = n-1; i >= 0; --i){ double yux = x[i]; for(int j = i+1; j < n; ++j){ yux -= A[i][j]*x[j]; } x[i] = yux; } return 1; } |