bin2pol.m

本程序实现了OFDM系统详尽的方针

function y = bin2pol(x)

% bin2pol
% 
% Converts binary numbers (0,1) to polar numbers (-1,1)
% Accepts a 1-D array of binary numbers

y = ones(1,length(x));
for i = 1:length(x)
	if x(i) == 0
		y(i) = -1;
	end
end