GaussRBFKernel

function [MYANS] =  GaussRBFKernel(x, y, sigema)
%param          x,y  表示要求Kernel距离的两个等长的向量 1*l
%param          sigema 表示Kernel函数需要的参数 K(x,y) = exp(-||x-y||^2 / sigema^2)
%function       这是一个求两个向量的通用高斯核距离的函数
%CopyRight NUST CS726 Jun.H(111060881)


%warning
xl = size(x, 2);
yl = size(y, 2);


if 1 == xl
    x = x';
    y = y';
    xl = size(x, 2);
    yl = size(y, 2);
end

if xl~=yl
    error('the two vector is not the same!');
end


%   sum =  ||x-y||.^2;
sum = 0;
for R=1:xl
    sum = sum + (x(1,R)-y(1,R))*(x(1,R)-y(1,R));
end


%   MYANS = exp(-sum / sigema.^2)
MYANS = exp(-sum / (sigema*sigema));