Back to Gallery
  • Remix
  • Share
  • New Entry
on 12 Oct 2021
  • 8
  • 7
  • 1
  • 0
  • 255
%Create radius theta system
theta = 0:0.01*pi:2*pi;
r = 1*pi:0.05*pi:2*pi;
[R,T] = meshgrid(r,theta);
%
Z_top = 2*sin(R);
Z_bottom = -2*sin(R);
%%Convert to Cartesian coordinates and plot
[X,Y,Z] = pol2cart(T,R,Z_top);
surf(X,Y,Z);
hold on;
[X,Y,Z] = pol2cart(T,R,Z_bottom);
surf(X,Y,Z);
axis equal
colormap copper(2)
view(45,38)
shading interp
axis off
Image
Remix Tree