• Remix
  • Share
  • New Entry

on 17 Oct 2024
  • 12
  • 135
  • 1
  • 2
  • 386
PPAP by Pikotaro
drawframe(1);
m = 
x
n = 
p = 
q = 
Write your drawframe function below
% An Apple a day keep The Doctor away
% Graph of Equation created by Dhimas Mahardika S.Si., M.Mat.
% from Sanggung Utara, Jatingaleh, Candisari
% Universitas Diponegoro
% Universitas Nasional Karangturi
function drawframe(f)
h = linspace(0,2*pi,96);
syms x y z
m=y*sin(h(f))+x*cos(h(f))
n=x*sin(h(f))-y*cos(h(f))
p=x^2+y^2-(x^2+y^2+0.5*z^2).^2
q=abs(2.2*sqrt(x^2+y^2)+0.2*z-0.08)+abs(2.2*sqrt(x^2+y^2)-0.2*z+0.08)-0.25
eqn = q.*p.*(abs((2.2*n+0.836).^2+abs(1.54*n+3.3*z-2.7148)+11*m) + abs((2.2*n+0.836).^2+abs(1.54*n+3.3*z-2.7148)-11*m)-1.25) == 0;
fimplicit3(eqn,[-1.5,1.5,-1.5,1.5,-1.5,1.5], MeshDensity=70);
axis equal
end
Movie
Audio
Remix Tree