periodshift.m

来自「2个用户下的Rake接收机 4径-5径多径 AWGN一级瑞利衰落信道 混合」· M 代码 · 共 23 行

                 %矩阵循环移位函数
                 function f=Periodshift(x,row,column)
                 %row-下移 column-右移
                 xsize=size(x);
                 f=x;
                 remrow=rem(column,xsize(1));
                 remcolumn=rem(column,xsize(2));
                 if remrow>0
                    f(1:remrow,:)=x(xsize(1)-remrow+1:xsize(1),:);
                     f(remrow+1:xsize(1),:)=x(1:xsize(1)-remrow,:);
                 elseif remrow<0
                     f(xsize(1)+remrow+1:xsize(1),:)=x(1:-remrow,:);
                     f(1:xsize(1)+remrow,:)=x(-remrow+1:xsize(1),:);
                 end
                 x=f;
                 if remcolumn>0
                     f(:,1:remcolumn)=x(:,xsize(2)-remcolumn+1:xsize(2));
                     f(:,remcolumn+1:xsize(2))=x(:,1:xsize(2)-remcolumn);
                 elseif remcolumn<0
                     f(:,xsize(2)+remcolumn+1:xsize(2))=x(:,1:remcolumn);
                     f(:,1:xsize(2)+remcolumn)=x(:,-remcolumn+1:xsize(2));
                 end