clear?format?compact
A=ones（2020）;
for?i=1:20
????for?j=1:20??????????????????????????????%生成矩陣A
????????A（ij）=min（ij）;
????end
end
G=zeros（2020）;
G（11）=sqrt（A（11））;
for?i=2:20
?????????G（i1）=A（i1）/G（11）;??
?????????for?j=2:i-1
????????????sum=0;
????????????for?p=1:j-1
????????????????sum=sum+G（ip）*G（jp）;
????????????end
????????????G（ij）=（A（ij）-sum）/G（jj）;
?????????end
????????
?????????sum_=0;
?????????for?p=1:i-1
????????????sum_=sum_+G（ip）^2;
????????????G（ii）=sqrt（A（ii）-sum_）;
?????????end
end
G
G*G‘

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件????????559??2009-12-22?00:41??last\Cholesky.m

?????文件????????938??2009-12-22?00:50??last\eightmain.m

?????文件?????????32??2009-12-22?00:49??last\f.m

?????文件???????2208??2009-12-22?00:46??last\five.m

?????文件????????221??2009-12-22?00:50??last\fsimpson.m

?????文件???????1122??2009-12-22?00:38??last\Gauss.m

?????文件????????725??2009-12-18?12:51??last\Gseidel.m

?????文件????????747??2009-12-21?23:06??last\Jacobi.m

?????文件????????820??2009-12-22?00:40??last\LDLT.m

?????文件????????521??2009-12-22?00:49??last\sevmain.m

?????文件???????2403??2009-12-22?00:47??last\six.m

?????文件????????528??2009-12-22?00:41??last\Tss.m

?????文件?????231936??2010-08-27?16:59??last\計算方法上機實習報告.doc

?????目錄??????????0??2010-08-27?16:59??last

-----------?---------??----------?-----??----

???????????????242760????????????????????14