Original code pcamat.m

- Back to the original code.