отчет

ТЕМА2/Prog1.m

@@ -0,0 +1,22 @@
+XX=load('dan_vuz.txt');
+size(XX);
+X=XX(:,3:13);;
+R=corr(X);
+[vect,lambda]=eig(X'*X);
+Sobst=diag(lambda);
+fprintf('Eigenvalues:\n %f \n',Sobst);
+fprintf('\n');
+SobMax=Sobst(end);
+GlComp=vect(:,end);
+Delt=100*SobMax/sum(Sobst);
+fprintf('Delta= %d \n ',round(Delt));
+Res=X*GlComp;
+fprintf(' Results \n ');
+fprintf('%d %f \n ',[XX(:,1),Res] ');
+save res.mat Res -mat;
+graphics_toolkit('gnuplot')
+hist(Res,20)
+xlabel('Results ');
+ylabel('Number of Unis ');
+hist(Res,20)
+