fun1.m

随着蜂窝移动通信市场的巨大发展

function r=fun1(M1,W,R)                             %求信干比
x=10;                                               %初始化信干比  
M=M1;
%x=fsolve('(40*x+1)*exp(-1/2*x)-1',x);           
x=fsolve('40*x*exp(-0.5*x)*((1-exp(-0.5*x)))^(79)-(1-exp(-0.5*x))^80',x);    %求解纳什均衡点的信干比
r=x;                                                %返回值