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 29 30 31 32 33 34 35 36
| %chargement des données
a = [0;0;0;0;3.14;3.84;4.54;5.23;5.93;7.84;9.59;11.33;13.07;14.82;15.63;19.1;22.57;26.05;28.47;29.52;33.65;37.62;38.82;44;44.46;51.3;55;58.14;65;75;83.56;85;96.42;109.27;114.91;130.23];
b = [-150;-130;-110;-90;-89.95;-109.93;-129.92;-149.91;-169.9;-89.66;-109.58;-129.51;-149.43;-169.35;-88.63;-108.33;-128.03;-147.72;-106.25;-167.42;-125.57;-103.37;-144.89;-164.21;-122.16;-140.95;-95.26;-159.75;-112.58;-129.9;-99.59;-147.22;-114.91;-130.23;-96.42;-109.27];
%chargement des paramètres:
pGmin=0.5;
pGmax=50;
pNiso=20;
pNray=10;%17;
pNang=30;%141;
pRmin=90;
pRmax=170;
pPang=270;
pDang=320;
%calcul des maillages:
tta = linspace(pPang*pi/180,pDang*pi/180,pNang)';
r = linspace(pRmin,pRmax,pNray)';
[ri,ttai] = meshgrid(r,tta);
xi = ri.* cos (ttai);
yi = ri.* sin (ttai);
[th,r] = cart2pol(a,b);
[thi,ri] = cart2pol(xi(:),yi(:));
[V,S] = alphavol([th r/100],5);
figure
patch('vertices',[th r/100],'faces',S.tri,'facevertexcdata',S.vol, ...
'cdatamapping','scaled','facecolor','flat');
hold on
plot(th,r/100,'r*',thi(:),ri(:)/100,'bo')
axis equal |
Partager