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