www.pudn.com > ldpc802.16.rar > down_sampling.m, change:2005-07-26,size:305b


function [data_out]=down_sampling(data_in,down_sampling_rate) 
%This function down-sample a sample to up_sampling_rate parts 
if (down_sampling_rate==1) 
    data_out=data_in; 
else 
    for i=1:size(data_in,2)/down_sampling_rate 
            data_out(:,i)=data_in(:,i*down_sampling_rate-1); 
    end 
end