iitst= 2:4:Q;
iival=4;4;Q;
iitr=[1:4:Q 3:4:Q];
val.P=ptrans(:,iival);
val.T=tn(:,iival);
test.P=ptrans(:,iitst);
test.P=tn(:,iitst);
ptr=ptrans(:,iitr);
ttr=tn(:,iitr);