1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26
| l=size(matr);
a=[0 0 0]; %initialisation
for i=1:l(1)
for j=1:l(2)
for k=1:l(3)
if matr(i,j,k)~=0
a=[a; i j k];
end
end
end
end
a=a(2:length(a),:); %on vire le premier vecteur qui a servi a initialiser a
a=transpose(a); % "a" contient les coordonées de mon volume
for alpha=0:pi/2:2*pi
rot=rotx(alpha); % rotx fabrique ma matrice de rotation
b=rot*a;
b=b(1:2,:); % je supprime les coordonées en z
figure
plot(b(1,:),b(2,:),'x')
% il faudrait maintenant que je puisse calculer la surface occupé
% par ces points (b), pour trouver le alpha qui va bien
end |
Partager