Doplnené o obrázky vygenerované službou Plotly.
Make love, not war:
t = linspace(0, 2*pi, 1000);
x = 16*(sin(t)).^3;
y = 13*cos(t) - 5*cos(2*t) - 2*cos(3*t) - cos(4*t);
plot(x, y, 'r');
Známa zelená rastlinka:
t = linspace(-pi, pi, 1000);
y1 = (1+0.9*cos(8*t)).*(1+0.1*cos(24*t));
y2 = ((0.9+0.05*cos(200*t)).*(1+sin(t)));
polar(t, y1.*y2, 'g');
Lorenzov atraktor:
f = @(t, x) [10*(x(2)-x(1)); x(1)*(28-x(3))-x(2); x(1)*x(2)-8/3*x(3)];
[t, y] = ode45(f, [0 20], [10 10 10]);
plot3(y(:, 1), y(:, 2), y(:, 3));
view(-6.5, 32);
Animovaná verzia: comet3(y(:, 1), y(:, 2), y(:, 3))
Nejaké "čudo judo":
t = linspace(0, 2*pi, 1000);
x = sin(2*t);
y = sin(3*t);
plot(x, y);
Trigonometrická ryba:
f = @(t) sin(t).*cos(201*t);
t = linspace(0, 1.1*pi, 1000);
plot(t, f(t));
Smiley:
c=4;
R = [];
for x = linspace(-4, 4, 200)
for y = linspace(-4, 4, 200)
if ((x-1)^2+y^2-4)*((x+1)^2+y^2-4)*(x^2+(y-sqrt(3))^2-4) < c
R = [R; x y];
end
end
end
plot(R(:, 1), R(:, 2), 'm.');
axis([-6 6 -5 5]);
Bonus: Gangnam style
Zdroj: http://functionspace.org/topic/360/What-are-the-funniest-beautiful-graph-s-equations-