lrmax.m

fading 在无线中的应用

function y = LRmax(rate,pmax,A,N);
[l n]=size(rate);
for j=1:n
   gam=exp(rate(j))-1;
   g21=pmax/(N(2)+gam*A(1,2)*(N(1)+A(2,1)*pmax));
   g22=(pmax-gam*N(1))/(gam*A(2,1)*(N(2)+A(1,2)*pmax));
   r2(j)=log(1+max(0,min(g21,g22)));
end;
y=r2;