逐行分析代码 生成莱斯衰落信道PDF clear all; close all; clc; 信号频率 fc = 24e9; 信号波长 lambda = physconstLightSpeedfc; 发射天线与接收天线之间的距离 d = 10lambda; 发射天线与接收天线之间的相对方向 theta = pi4; 相位偏移 phi = 0; 相位差 delta_phase = 2pi

% 生成莱斯衰落信道PDF clear all; close all; clc;

% 信号频率 fc = 2.4e9;

% 信号波长 lambda = physconst('LightSpeed')/fc;

% 发射天线与接收天线之间的距离 d = 10*lambda;

% 发射天线与接收天线之间的相对方向 theta = pi/4;

% 相位偏移 phi = 0;

% 相位差 delta_phase = 2pid/lambda*cos(theta)+phi;

% K因子 K = 0.5;

% 生成莱斯衰落信道 N = 1e6; % 信道采样点数 s = (randn(1,N)+1i*randn(1,N))/sqrt(2); % 生成高斯白噪声信号 h = sqrt(K/(K+1))exp(1idelta_phase) + sqrt(1/(K+1))*s; % 生成莱斯衰落信道

% 计算莱斯衰落信道PDF bins = 100; % 直方图的柱子数 pdf = hist(abs(h),bins)/N; % 计算概率密度

% 绘制PDF图像 figure(1); bar(linspace(0,max(abs(h)),bins),pdf); % 绘制直方图 xlabel('Amplitude'); ylabel('Probability'); title('Ricean Fading Channel PDF');