mirror of
https://github.com/kuhyx/WUT_Computer_Science.git
synced 2026-11-11 13:27:38 +01:00
12 lines
545 B
Matlab
12 lines
545 B
Matlab
function[L1] = cholesky(A,n)
|
|
L1 = zeros(n,n);
|
|
for i = 1:n %przechodzenie po kolumnach
|
|
for j = i:n %przechodzenie wierszy wewnątrz kolumny
|
|
if(i == j)
|
|
L1(i,i) = sqrt(A(i,i)-sumDiag(L1,i)); %przypisanie wartości na przekątnej macierzy
|
|
else
|
|
L1(j,i) = (A(j,i)-sumRest(L1,i,j))/L1(i,i); %przypisanie wartości w reszcie przypadków
|
|
end
|
|
end
|
|
end
|
|
end |