%记录每次权值调整后的训练误差
ErrHistory=[ErrHistory SSE];
if SSE<E0,break,end
for i=1:UnitNum
CentGrad=(SamIn-repmat(Center(:,i),1,SamNum))*(Error.*UnitOut(i,:)*W(i)/SP(i)^2)';
SPGrad=AllDist(i,:).^2*(Error.*UnitOut(i,:)*W(i)/(SP(i)^3))';
WGrad=Error*UnitOut(i,:)';
Center(:,i)=Center(:,i)+IrCent*CentGrad;
SP(i)=SP(i)+IrSP*SPGrad;
W(i)=W(i)+IrW*WGrad;
