3

ТЕМА2/Prog2.m

@@ -0,0 +1,23 @@
+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;
+hist(Res,20)
+xlabel('Results ')
+ylabel('Number of Unis ')
+saveas(gcf, 'Hist2.jpg ', 'jpg ');
+CorFin=corr(Res,XX(:,2));
+fprintf('Correlation of Results and Money = %f \n',CorFin);
+