spitrain.m

利用matlab开发的art、artmap、fuzzy art等程序

function spiral=spitrain
for n=1:97
   alpha(n)=pi*(n-1)/16;
   r(n)=0.4*((105-n)/104);
   a(2*n-1,1)=r(n)*sin(alpha(n))+0.5;
   a(2*n-1,2)=r(n)*cos(alpha(n))+0.5;
   b(2*n-1,1)=1;
   a(2*n,1)=1-a(2*n-1,1);
   a(2*n,2)=1-a(2*n-1,2);
   b(2*n,1)=0;
   spiral=[a,b];
end