?? sympos3.m
字號:
function [x,L,D]= SymPos3 (A,b)
N = size(A);
n = N(1);
L = eye(n,n); %L的對角元素為1
d = zeros(n,1);
AA = zeros(n,n); %保存的中間變量
for k=1:n
d(k,1) = A(k,k)-AA(k,1:(k-1))*transpose(L(k,1:(k-1)));
%D的第k個對角元素
for i=(k+1):n
AA(i,k) = A(i,k)-AA(i,1:(k-1))*transpose(L(k,1:(k-1)));
%AA的第k列
L(i,k) = AA(i,k)/d(k,1);
%L的第k列
end
end
D = diag(d);
y = SolveDownTriangle(L,b); %求解y
for i=1:n
y(i,1)=y(i,1)/d(i,1);
end
x = SolveUpTriangle(transpose(L),y); %求解x
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -