sixteenvec2binvec.m

本程序利用改进的CHOW算法

function e=sixteenvec2binvec(b)
%pass in b (a quad vector(0,1,2,3,...,15))
%result is equivalent binary vector in form MSB LSB
%written by Joe Williams, Stanford University
%if you use this, give author proper credit


e=zeros(1,length(b)*4);
for c=1:length(b)
e(4*c-3)=floor(b(c)/8);
e(4*c-2)=floor((b(c)-8*e(4*c-3))/4);
e(4*c-1)=floor((b(c)-8*e(4*c-3)-4*e(4*c-2))/2);
e(4*c)=rem(b(c),2);
end