%  Exponential power distribution Figure 6.9
po=2;
p=[0:800]/100;
pp=exp(-p/po)/po;
figure;
plot(p,pp,'k')
axis([0 8 0 .5])
xlabel('Power (\muV)')
ylabel('p(p)')
legend('po=2\muW')
hold on
x=[0 p(1:100) p(100)];
y=[0 pp(1:100) 0];
fill(x,y,[.9 .9 .9])