Отчёт законченый

ТЕМА2/Prog1.m

@@ -1,22 +1,32 @@
-XX=load('dan_vuz.txt')
-size(XX)
-X=XX(:,3:13)
-R=corr(X)
-[vect,lambda]=eig(X'*X)
+fp=fopen('prtcl.txt ','w');
+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, 'Hist.jpg ', 'jpg ')
-CorFin=corr(Res,XX(:,2))
-fprintf('Correlation of Results and Money = %f \n',CorFin)
+fprintf(fp,'Eigenvalues:\n %f \n',Sobst);
+fprintf('\n');
+SobMax=Sobst(end);
+GlComp=vect(:,end);
+Delt=100*SobMax/sum(Sobst);
+fprintf(fp,'Delta= %d \n ',round(Delt));
+Res=X*GlComp;
+fprintf(fp,' Results \n ');
+fprintf(fp,'%d  %f \n ',[XX(:,1),Res] );
+MinRes = min(Res);
+MaxRes = max(Res);
+MeanRes = mean(Res);
+stdRes = std(Res);
+fprintf(fp, 'Min   %f \n ',MinRes );
+fprintf(fp,'Max   %f \n ',MaxRes );
+fprintf(fp,'Mean = %f \n ', MeanRes);
+fprintf(fp,'Std = %f \n ', stdRes);
+save res.mat Res -mat;
+hist(Res,20);
+xlabel('Results ');
+ylabel('Number of Unis ');
+saveas(gcf, 'Hist.jpg ', 'jpg ');
+CorFin=corr(Res,XX(:,2));
+fprintf(fp,'Correlation of Results and Money = %f \n',CorFin);
+fclose(fp);