testpnn.m

来自「粒子群算法」· M 代码 · 共 16 行

function [y] = testPNN(T,A1,C1)
%UNTITLED2 Summary of this function goes here
%  Detailed explanation goes here

max_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';