function sample=data2sample(data)
L=length(data);
sample=zeros(1,L+3);

ac=1;

for i=1:L
    if(data(i)==1)
    ac=ac+1;
   
    addvec=zeros(1,L+3);
    addvec(i)=1;
    addvec(i+1)=3;
    addvec(i+2)=3;
    addvec(i+3)=1;
    addvec=(-1)^ac.*addvec;
    sample=sample+addvec;
    end
end