?? jia1.asv
字號:
function X=jia1(A,t,n)
a=eig(A);A=[1 ]
Q=eye(n);
syms s
r(1)=exp(a(1)*t);
S=zeros(n,n);
S=S+r(1)*Q;
for i=2:n;
r1=inline(r(i-1));
r(i)=int(exp(a(i)*(t-s))*r1(s),s,0,t);
Q=(A-a(i-1)*eye(n))*Q;
S=S+r(i)*Q;
end
X=S;
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -