多普勒频移对OFDM性能的影响，请写出MATLAB代码

多普勒频移是指信号在移动接收器的过程中，由于相对速度的变化导致接收信号的频率发生改变，从而影响OFDM系统的性能。为了考虑多普勒频移对OFDM系统的影响，我们可以使用MATLAB进行仿真。

首先，我们需要生成一个OFDM信号，假设我们使用64个子载波，其中包含48个数据子载波和16个导频子载波。我们可以使用MATLAB内置的函数`ofdmmod`和`ofdmdemod`来生成和解调OFDM信号。

% OFDM参数
N = 64; % 子载波个数
cp_len = 16; % 循环前缀长度
fs = 100e3; % 采样率
Ts = 1/fs; % 采样时间间隔
fd = 100; % 多普勒频移

% 生成OFDM信号
data = randi([0 1],48,1); % 生成随机数据
pilot = ones(16,1); % 导频序列
tx_data = ofdmmod(data,N,pilot,cp_len); % 生成OFDM信号

% 模拟多普勒频移
t = 0:Ts:((N+cp_len)*Ts*(length(data)/N))-Ts; % 时间向量
rx_data = tx_data .* exp(-1j*2*pi*fd*t(:)); % 加入多普勒频移

接下来，我们可以对加入多普勒频移的OFDM信号进行解调，并计算误比特率（BER）。

% 解调OFDM信号
rx_data = rx_data .* exp(1j*2*pi*fd*t(:)); % 去除多普勒频移
rx_bits = ofdmdemod(rx_data,N,pilot,cp_len); % 解调OFDM信号

% 计算误比特率
ber = sum(rx_bits~=data)/length(data);
fprintf('BER = %f\n',ber);

完整代码如下：

% OFDM参数
N = 64; % 子载波个数
cp_len = 16; % 循环前缀长度
fs = 100e3; % 采样率
Ts = 1/fs; % 采样时间间隔
fd = 100; % 多普勒频移

% 生成OFDM信号
data = randi([0 1],48,1); % 生成随机数据
pilot = ones(16,1); % 导频序列
tx_data = ofdmmod(data,N,pilot,cp_len); % 生成OFDM信号

% 模拟多普勒频移
t = 0:Ts:((N+cp_len)*Ts*(length(data)/N))-Ts; % 时间向量
rx_data = tx_data .* exp(-1j*2*pi*fd*t(:)); % 加入多普勒频移

% 解调OFDM信号
rx_data = rx_data .* exp(1j*2*pi*fd*t(:)); % 去除多普勒频移
rx_bits = ofdmdemod(rx_data,N,pilot,cp_len); % 解调OFDM信号

% 计算误比特率
ber = sum(rx_bits~=data)/length(data);
fprintf('BER = %f\n',ber);