06.08.2013 Views

内容简介作者简介 - 科学与工程计算系

内容简介作者简介 - 科学与工程计算系

内容简介作者简介 - 科学与工程计算系

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

SM2=sparse(2:n,1:n-1,ones(1,n-1),n,n,n-1);S1=SM1+SM2+SM2'<br />

e=ones(n,1);S2=spdiags([e,-2*e,e],[-1,0,1],n,n),SF=full(S1)<br />

S1 =<br />

(1,1) -2<br />

(2,1) 1<br />

(1,2) 1<br />

(2,2) -2<br />

(3,2) 1<br />

(2,3) 1<br />

(3,3) -2<br />

(4,3) 1<br />

(3,4) 1<br />

(4,4) -2<br />

(5,4) 1<br />

(4,5) 1<br />

(5,5) -2<br />

S2 =<br />

(1,1) -2<br />

(2,1) 1<br />

(1,2) 1<br />

(2,2) -2<br />

(3,2) 1<br />

(2,3) 1<br />

(3,3) -2<br />

(4,3) 1<br />

(3,4) 1<br />

(4,4) -2<br />

(5,4) 1<br />

(4,5) 1<br />

(5,5) -2<br />

SF =<br />

-2 1 0 0 0<br />

1 -2 1 0 0<br />

0 1 -2 1 0<br />

0 0 1 -2 1<br />

0 0 0 1 -2<br />

4.15.3 稀疏矩阵的运算<br />

4.15.3.1 基本规则<br />

4.15.3.2 常用指令及应用举例<br />

【例 4.15.3.2-1】全元素矩阵、稀疏矩阵、最小排序稀疏矩阵三角分解所需时间的比较。<br />

clear all,n=200; %<br />

rand('state',1),randn('state',2) %<br />

A=sprandsym(n,0.015,0.1,1); %<br />

subplot(1,2,1),spy(A,'b',10),title('Spy plot of matrix A')<br />

subplot(1,2,2),d=symmmd(A); %<br />

spy(A(d,d),'b',10),title('Matrix A with Minimun degree ordering');<br />

B=full(A); %<br />

%<br />

format short e<br />

tic, L1=chol(B);t1=toc; %<br />

tic, L2=chol(A);t2=toc/t1; %<br />

tic, L3=chol(A(d,d));t3=toc/t1; %<br />

disp(' 全元素阵 稀疏矩阵 最小排序阵'),disp([1,t2,t3])<br />

全元素阵 稀疏矩阵 最小排序阵<br />

1 0 0<br />

42

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!