load('dataspiral.mat');
global p1;

p1=0.5;
ker='rbf';
[nsv, alpha, bias,Xs,Ys,alphas] = svc(X,Y,ker,0.5);
[h] = svcplot(X,Y,ker,alpha,bias);
Ytr =svcoutput(X,Y,Xt,ker,alpha,bias);
[N,d]=size(Yt);
CR=length(find(Ytr-Yt==0))./N;
YY=[Ytr,Yt];