create_channel.asv

matlab编写的MIMO-OFDM仿真程序

function[H,H_f] = create_channel(Mt,Mr,A,N);
%产生频率选择性衰落的瑞利信道，参数由天线结构、OFDM系统的结构和功率时延结构来决定。%
%
%function[H,H_f] = create_channel(Mt,Mr,A,N);
%
%   A----功率时延谱矢量 
%   Mt---发送天线数 
%   Mr---接收天线数
%   N----在一个OFDM符号发送天线端的矢量符号数
%   例如在一个OFDM符号中有N个MIMO传输
%   频率选择性衰落信道，假设复高斯过程在相位和幅度上市独立的
%定义 信道
H_int = 1/sqrt(2)*(randn(Mr*length(A),Mt) +j*randn(Mr*length(A),Mt));

H_int2 =[];
for i=1:length(A)
    H_int2 =[H_int2;sqrt(A(i))*H_int((i-1)*Mr+1:i*Mr,:)];
end

H_int2 =[H_int2;zeros((N-length(A))*Mr,Mt)];

H_f=zeros(Mr,Mt*(N -16));
for i=1:Mt
    for jj= 1:Mr
        h_f=fft(H_int2(jj:Mr:(N-16-1)*Mr +jj,i));
        for k = 1:(N-16)
            H_f(jj,i+(k-1)*Mt) = h_f(k);
        end
    end
end
H = [H_int2];
for i =1:N-1
    H=[H,[zeros(Mr*i,Mt);H_int2(1:(N-i)*Nr