clf % borra grafico

x = linspace(0,4*pi,100);
polar(x,x);

x = linspace(1,4*pi,100);
polar(x,1./x);

t = 0:.01:2*pi;
polar(t,sin(2*t).*cos(2*t),'--r')

[x y z] = cylinder;
surf(x,y,z);
mesh(x,y,z);

x = linspace(0,2*pi,100);
area(f(x));

x = 2.^linspace(1,10,10);
pie(x);
bar(x);

[x y z] = peaks(100);
surf(x,y,z);
mesh(x,y,z);
[C,h] = contour(z,10);
colormap autumn

% gradiente
v = -2:0.2:2;
[x,y] = meshgrid(v);
z = x .* exp(-x.^2 - y.^2);
mesh(x,y,z);
[px,py] = gradient(z,.2,.2);
contour(v,v,z), hold on, quiver(v,v,px,py), hold off