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 27 28
| clear all;
close all;
clc
%lecture des images
%initialisation
I1=imread('C:\Users\INFOPLUS\Desktop\prgs mémoire M2\coupe\SE1.jpeg');
[n m]=size(I1);
I=zeros(n,m,9);
for i=1:9
chemin=cat(2,'C:\Users\INFOPLUS\Desktop\prgs mémoire M2\coupe\SE',num2str(i),'.jpeg');
I(:,:,i)=imread(chemin);
end
close all;
TSs=smooth3(I,'box',3);
%subplot(1,2,2)
p=patch(isosurface(TSs,0),'FaceColor', 'blue','EdgeColor','none');
patch(isocaps(TSs,1),'FaceColor','interp','EdgeColor','yellow');
isonormals(TSs,p);
%isosurface(TSs,0);
view(3);axis vis3d tight off
camlight; lighting phong
title('région cardiaque lissées'); |
Partager