新建 文本文档1.txt

来自「详细讲解了模式识别的算法理论」· 文本 代码 · 共 11 行

load d:\exercise\ss.txt;
a=mean(ss(1:12,:));
a(2:2,:)=mean(ss(13:35,:));
b1=(ss-ones(35,1)*a(1:1,:))./(ones(35,1)*sqrt(diag(cov(ss(1:12,:))))');
b=sqrt(diag(b1*b1'));
b2=(ss-ones(35,1)*a(2:2,:))./(ones(35,1)*sqrt(diag(cov(ss(13:35,:))))');
b(:,2:2)=sqrt(diag(b2*b2'));
for i=1:35,
b(i:i,3:3)=i;
end