%% Parameters & Functions
Rb=10e9; % Data Rate
B=2e10 ;% Bandwidth
Lam=1550e-9; % Wavelength
Rd=0.85; %Responsivity
Plo=3e-3; %local oscillator power
Cs=1e-14; % Refractive Index Para for strong
e=1.6023e-19; % charge of electron
K=1.38e-23;
Rl=50; % Load Resistance
T=300; % Temperature
Pt=4e-3; % transmitter power
Pr=4e-3; % receiver power
IdB=linspace(0,75,100);
I=10.^(IdB/10);
SNR= @(I) (((2*Rd*sqrt(4*Pr*Plo.*I)).^2)./(2*B*e*((Rd*Pr.*I)+(Rd*Plo))))+ (4*K*T*B/Rl);
SNRdB= @(I) 10*log10(SNR(I));
BER= @(I) (0.5*erfc(sqrt(SNR(I)/2)/2));
R= BER(I)
I am getting all zeros for BER. What should I do?
