sort_d_v_opt.m

这个第四代移动通信中

function [D_R_opt_sort,V_R_opt_sort] = sort_D_V_opt(A, D_R_opt, V_R_opt); 
%just sprt D_R_opt & V_R_opt by A   
% this function is to reshape the matrix D_opt,V_opt,D_R,V_R,accordig to A,S

size_A = length(A);
size_D = length(D_R_opt);

i = 1;
while (i<= size_A)
    index = 1;
    while (index <= size_D)
        % Sorting D_R_opt, V_R_opt
	    if abs(D_R_opt(index,index) - A(i,i)) < 10^(-6)
		    D_R_opt_new(i,i) = D_R_opt(index,index);
		    V_R_opt_new(:,i) = V_R_opt(:,index);
	    end;
        % Sorting D_R, V_R
%         if abs(angle_D(index) - angle_A(i)) < 1/size_A
% 		    D_R_new(i,i) = D_R_opt(index,index);
% 		    V_R_new(:,i) = V_R_opt(:,index);  
%         end;
        index = index + 1;
    end;
    i = i + 1;
end;
D_R_opt_sort = D_R_opt_new;
V_R_opt_sort = V_R_opt_new;