depre_transmitdiversity.m

尽量不要让站长把时间都花费在为您修正说明上。压缩包解压时不能有密码。

%**************************************************************************
%
%**************************************************************************
function x=depre_transmitDiversity(y,P)
for i=1:M_layer;M_ap=2*M_layer;
   if P=2;
    
     B= [1,0,j,0;0,-1,0,j;0,1,0,j;1,0,-j,0];
      [real(x1(i)),real(x2(i)),imag(x1(i)),imag(x2(i))].'=sqrt(2)*inv(B)* [y1(2i),y2(2i),y1(2i+1),y2(2i+1)].'
      x1(i)=real(x1(i)+imag(x1(i))*j;
      x2(i)=real(x2(i)+imag(x2(i))*j;
      x(i) = [x1(i),x2(i)].';
   else P=4;
    
     C= [1,0,0,0,j,0,0,0;
         0,0,0,0,0,0,0,0;
         0,-1,0,0,0,j,0,0;
         0,0,0,0,0,0,0,0;
         0,1,0,0,0,j,0,0;
         0,0,0,0,0,0,0,0;
         1,0,0,0,-j,0,0,0;
         0,0,0,0,0,0,0,0;
         0,0,0,0,0,0,0,0;
         0,0,1,0,0,0,j,0;
         0,0,0,0,0,0,0,0;
         0,0,0,-1,0,0,0,j;
         0,0,0,0,0,0,0,0;
         0,0,0,1,0,0,0,j;
         0,0,0,0,0,0,0,0;
         0,0,1,0,0,0,-j,0] ;
     [Q,R]=qr(C);
     y=[y1(4i),y2(4i),y3(4i),y4(4i),y1(4i+1),y2(4i+1),y3(4i+1),y4(4i+1),y1(4i+2),y2(4i+2),y3(4i+2),y4(4i+2),y1(4i+3),y2(4i+3),y3(4i+3),y4(4i+3)].';
     [real(x1(i)),real(x2(i)),real(x3(i)),real(x4(i)),imag(x1(i)),imag(x2(i)),imag(x3(i)),imag(x4(i))].'= sqrt(2)*(R\(Q\y));
     x1(i)=real(x1(i))+imag(x1(i))*j;
     x2(i)=real(x2(i))+imag(x2(i))*j;
     x3(i)=real(x3(i))+imag(x3(i))*j;
     x4(i)=real(x4(i))+imag(x4(i))*j;
     x(i) = [x1(i),x2(i),x3(i),x4(i)].';  
   end;
end;
x;