1
0

creatcatcardeucl.m 382 B

123456789101112131415161718
  1. function modelmat=creatcatcardeucl
  2. th=[0 0 0 0 pi/2 pi/2 pi/2 pi/2 pi pi pi pi pi*1.5 pi*1.5 pi*1.5 pi*1.5]+pi/4;
  3. [x,y]=pol2cart(th',1); % draw unit circle in Cartesian coords
  4. xy=[x y]; % cat for easier indexing below
  5. for a=1:length(th)
  6. for b=1:length(th)
  7. modelmat(a,b)=norm(xy(a,:) - xy(b,:)); %euclidean
  8. end
  9. end
  10. end