查看单个帖子
旧 2008-08-25, 22:12   #2
pslpsl
普通会员
 
注册日期: 2008-08-17
年龄: 36
帖子: 70
声望力: 20
pslpsl 是一个将要出名的人pslpsl 是一个将要出名的人
酷 回复: [求助]编个小程序

代码:
 
%得到如下形式的矩阵
% [ 1 2 3 4 
% 1/2 1 2 3
% 1/3 1/2 1 2
% 1/4 1/3 1/2 1 ]
%EDIT BY PSL@CSU
%QQ:547423688
%Email:[email protected]
function M=get_M(n)
%M=get_M(4)可得到如上矩阵
M=zeros(n);
for i=1:n
    for j=1:i-1
        M(i,j)=1/(i+1-j);
    end
        M(i,i:n)=[1:n-i+1];
end
%EDIT BY PSL@CSU
%QQ:547423688
%Email:[email protected]
pslpsl 当前离线   回复时引用此帖