my_guass.m

RBF神经网络 RBF神经网络

function [H]=My_Guass(data2,cents,K,R)
%构造Guass函数矩阵H
for m=1:size(data2)
    for n=1:K
        H(m,n)=exp(-(data2(m,:)-cents(n,:))*R(:,:,n)*(data2(m,:)-cents(n,:))');
    end
end
h(1:size(data2))=1;  % 相当于加入一个隐藏单元，该单元输出为1.也就是在输出层加了一个要求出的偏置
% H=[H,h'];
H=[h',H];