function pcaQuickTest(A, eigen) % Testing function, can be discarded when satisfactory results have been % obtained. C = pca(A, eigen);