我爲你寫了一些C代碼。也許它可以幫助。這是一個將密集矩陣分解爲L,U的過程,其中L * U = A,L - 下三角,U - 上三角,L [i,i] = U [i,i](對角元素相等) 。這種分解也稱爲LU(sq)。
#include <math.h>
// A, L, U each allocates at least N*N doubles
// A contains elements of given matrix, written row by row
void decompose(unsigned N, double *A, double *L, double *U) {
#define _(M,i,j) M[N*i + j]
#define _A(i,j) _(A,i,j)
#define _L(i,j) _(L,i,j)
#define _U(i,j) _(U,i,j)
_L(0,0) = sqrt(_A(0,0));
_U(0,0) = sqrt(_A(0,0));
for (int i = 0; i < N; ++i) {
_L(i,0) = _A(i,0)/_A(0,0);
_U(0,i) = _A(0,i)/_A(0,0);
_L(0,i) = _U(i,0) = 0.0;
double s = 0.0;
for (int k = 0; k < i; ++k) {
s += _L(i,k) * _U(k,i);
}
_L(i,i) = _U(i,i) = sqrt(_A(i,i) - s);
for (int j = 1; j < i; ++j) {
double s = 0.0;
for (int k = 0; k < j; ++k) {
s += _L(i,k) * _U(k,j);
}
_L(i,j) = (_A(i,j) - s)/_L(i,i);
_L(j,i) = 0.0;
double s = 0.0;
for (int k = 0; k < i; ++k) {
s += _L(i,k) * _U(k,j);
}
_U(j,i) = (_A(i,j) - s)/_U(i,i);
_U(i,j) = 0.0;
}
}
}
不幸的是,我現在沒有時間檢查錯誤代碼。 我有一些公式,我有信心(幾年前使用):
我的代碼是基於這些公式。 當然,如果你想使用一些特定的適合你的數據稀疏格式,你需要改變過程,但不是公式。
您的矩陣密集還是稀疏?你用什麼格式來存儲它? –
矩陣非常稀疏,我還沒有推斷過格式,但它不是問題。 –