% LE CONE

% Ce script crée un cône de hauteur A et de rayon de base B, dont la base est centrée en (C;D;E):

A = 2;

B = 1;

C = 0;

D = 0;

E = 0;

[r,t] = meshgrid(0:B/50:B,0:pi/25:2*pi); % Base circulaire

x = r.*cos(t);

y = r.*sin(t);

z = A-A*r/B; % Elévation en fonction du rayon

surf(x+C,y+D,z+E)

colormap jet

shading interp

axis image

% NOTE: La base de ce cône n'est pas représentée, il faut la dessiner séparément.