Back to Gallery
  • Remix
  • Share
  • New Entry
on 30 Nov 2023
  • 12
  • 41
  • 1
  • 2
  • 289
drawframe(24);
Write your drawframe function below
% R.RAMYA,Departmnet of ECE
% K.S.Rangasamy College of Technology, Tiruchengode
function drawframe(f)
% Butterfly Clitoria Ternatea
% Create of one big petal, and a one large stamen
[R,T]=ndgrid(0:.01:1,0:.02:2);
% Assess a petals curve
openRate = (23-abs(24-f))/24;
W=R.*((1-abs((1-mod(T,2))))*.7+.3) * openRate;
% Compute the disk with the petals
X=W.*cospi(T);
Y=W.*sinpi(T);
% Convert Z to have an S model to it to make it fluted
Z=(-cospi(W*1.4)+1).^.3 * openRate;
% Graph the stamen
g=@(i)i((20:50),50)/4;;
plot3(g(X),g(Y),g(Z*4),'o',Color='#FB3');
% Draw complete flower
surface(X,Y,Z);
shading interp
% Perfect the Axes, etc
axis equal off
light
material([.8
.8
.4])
colormap red
set(gcf,Color='#2a2')
end
Animation
Remix Tree