- /
-
Creating Reality using Mathematics Formula
on 11 Oct 2024
- 12
- 235
- 0
- 0
- 819
Song Title "Older" by Sasha Alex Sloan
drawframe(1);
Write your drawframe function below
% Graph of Equation created by Dhimas Mahardika S.Si., M.Mat.
% from
% Sanggung Utara, Jatingaleh, Candisari, Semarang, Indonesia
% Universitas Nasional Karangturi Semarang
% Universitas Diponegoro Tembalang
function drawframe(f)
t = linspace(0,2*pi);
h = linspace(0,2*pi,100);
h1= linspace(0.25,19.4,100);
a=h(f)
a1=h1(f)
p=sin(t-0.07).*((cos(t-0.16)).^2).*sin(t)
q=0.8*sin(t-0.07).*((cos(t-0.16)).^2).*cos(t)
p1=p.*sin(a1)
q1=-p.*cos(a1)
x=p1
y=q.*sin(a)+(q1-0.7).*cos(a)
z=(q1-0.7).*sin(a)-q.*cos(a)
x1=-p1
y1=q.*sin(a)+(q1-0.7).*cos(a)
z1=(q1-0.7).*sin(a)-q.*cos(a)
x2=0.7*p1
y2=0.7*q.*sin(a) + 0.7*(q1-1).*cos(a)
z2=0.7*(q1-1).*sin(a) - 0.7*q.*cos(a)
x3=-0.7*p1
y3=0.7*q.*sin(a) + 0.7*(q1-1).*cos(a)
z3=0.7*(q1-1).*sin(a) - 0.7*q.*cos(a)
x4=0.4*p1
y4=0.4*q.*sin(a) + 0.4*(q1-1.75).*cos(a)
z4=0.4*(q1-1.75).*sin(a) - 0.4*q.*cos(a)
x5=-0.4*p1
y5=0.4*q.*sin(a) + 0.4*(q1-1.75).*cos(a)
z5=0.4*(q1-1.75).*sin(a) - 0.4*q.*cos(a)
plot3(x,y,z,x1,y1,z1,x2,y2,z2,x3,y3,z3,x4,y4,z4,x5,y5,z5,'LineWidth',3,'Color',[1 0 0])
MeshDensity=5555
axis equal
axis([-0.5 0.5 -1.05 1.05 -1.05 1.05])
end