matlab KPCA函数

function [YeigVectoreigValue] = KPCA（Xdtypepara）
%% cheak input
if （ strcmp（type‘simple‘） || strcmp（type‘poly‘） || ...
        strcmp（type‘gaussian‘） ） == 0
    Y=[];
    eigVector=[];
    fprintf（[‘\nError: Kernel type ‘ type ‘is not supportted. \n‘]）;
    return;
end

N=size（X1）;

%% kernel PCA
K0=kernel（Xtypepara）;
oneN=ones（NN）/N;
K=K0-oneN*K0-K0*on