transm_power1111.m

来自「fading 在无线中的应用」· M 代码 · 共 16 行

function [prob_power,input_power]=transm_power(porc_prob,M,R)
clear;clc;
porc_prob=input('Please indicate what porcentage of coverage you want:');
M=input('Please enter the number of users:');
R=input('Please enter the radius:');
[m,g_total,g_dist,g_fading]=totalpathgain(M,R)
prob=0;
for i=1:1:M;
    if g_total(i)>=-70
        prob=prob+1;
    else
        prob=prob;
    end
end
prob_power=prob/M*100