Val.P = P_test; Val.T = T_test;
[P_train_n minp maxp] = premnmx(P_train);
Val_n.P = tramnmx(P_test,minp,maxp);
Val_n.T = T_test;
[P_train_std meanp stdp] = prestd(P_train);
Val_std.P = trastd(P_test,meanp,stdp);
Val_std.T = T_test;
%[P_pca transMat] = prepca(P_train_std,0.02);
%Val_pca.P = trapca(Val_std.P,transMat);
%Val_pca.T = T_test;
[pc latent explained] = pcacov(P_train_std*P_train_std');
n = 57;
explained
Q = pc(:,1:n);
P_train_pca = Q'*P_train_std;
Val_pca.P = Q'*Val_std.P;
Val_pca.T = T_test;