列范数
clear all;
A= input ('以行向量形式输入 x 的取值');
n= input('数组行数');
p=0;
s=zeros(n,1);
for i=1:n;
for j=1:n;
s(i)=s(i)+abs(A(i,j));
end;
end;
for i=1:n-1;
for j=i+1:n;
if(s(i)<s(j))
p=s(i);s(i)=s(j);s(j)=p;end;
end;
end;
s(1)
行范数
clear all;
A= input ('以行向量形式输入 aij 的取值');
n= input('数组列数');
p=0;
s=zeros(n,1);
for j=1:n;
for i=1:n;
s(j)=s(j)+abs(A(i,j));
end;
end;
for i=1:n-1;
for j=i+1:n;
if(s(i)<s(j))
p=s(i);s(i)=s(j);s(j)=p;end;
end;
end;
s(1)
2 范数
clear all;
A= input ('以行向量形式输入 aij 的取值');
n= input('数组行数');
k= input('数组列数');
s=0;
for i=1:n;
for j=1:k;
s=s+(A(i,j))^2;
end;
end;
s=sqrt(s)
评论10