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 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55
| N = 15;
nN = (N-1)/2;
lamb1 = 1;
lamb2 = 3;
alph1 = 2;
alph2 = 2;
figure
grid
hold on
xin=-nN:nN/100:nN;
hx(1:100)=0;
for i=101:length(xin)
hx(i)=(lamb1^alph1/gamma(alph1))*xin(i)^(alph1-1)*exp(-lamb1*xin(i));
end
plot(xin,hx,'LineWidth',2)
xlabel('x1')
ylabel('fX1(x1)')
title('densité de probabilité de la distribution Gamma #1')
figure
grid
hold on
yin=-nN:nN/100:nN;
hy(1:100)=0;
for i=101:length(yin)
hy(i)=(lamb2^alph2/gamma(alph2))*yin(i)^(alph2-1)*exp(-lamb2*yin(i));
end
plot(yin,hy,'LineWidth',2)
xlabel('x2')
ylabel('fX2(x2)')
title('densité de probabilité de la distribution Gamma #2')
figure
grid
hold on
for i=1:length(xin)
hxy(i,:)=hx(i)*hy(:);
end
subplot(2,1,1)
[xin,yin]=meshgrid(-nN:nN/100:nN);
surfl(xin,yin,hxy)
xlabel('x1')
ylabel('x2')
zlabel('fX1X2(x1,x2)')
subplot(2,1,2)
contourf(xin,yin,hxy)
xlabel('x1')
ylabel('x2')
zlabel('fX1X2(x1,x2)')
title('densité de probabilité jointe') |
Partager