function [y] = testPNN(T,A1,C1)%UNTITLED2 Summary of this function goes here%  Detailed explanation goes heremax_ev =5;  %選擇主元個數[COEFF,SCORE,latent,tsquare]=princomp(A1);A2=A1*COEFF(:,1:max_ev);C2=C1*COEFF(:,1:max_ev);    P=A2';%     T=B1';    net=newrb(P,T,0.5,2);    P=C2';    y=sim(net,P);    y=y';