function [] =PCA_test  ()
	A = load('../../../data/mldata/mnist-original.mat')
	X = A.data' ;
	 X = double(im2double(X));
	 W = pca(X);
	 
	 C = cov(X);    
	 eigval = eig(C) 
	
	 whos
	
% surf(X,Y,M2)