• Remix
  • Share
  • New Entry

on 26 Oct 2021
  • 5
  • 25
  • 0
  • 0
  • 276
[x,y,z]=sphere(7);
r=rand(8)+1;
x=r.*x;
y=r.*y;
z=r.*z;
T=delaunay(x,y,z);
R=triangulation(T,x(:),y(:),z(:));
m='markerf';
o='-ok';
for i=1:size(R,1)
r=R.Points(R.ConnectivityList(i,:),:);
plot3(r(:,1),r(:,2),r(:,3),o,m,'r');
hold on;
end
x=x-10;
plot3(x,y,z,'k',x',y',z','k',x,y,z,o,m,'r');
axis equal off;
Image
Remix Tree