function  [sequenz,data]=logistic(n,transient,a)
%Funktion erzeugt binäre Symbolsequenz der Länge n mit der erzeugenden Partition aus der
%logistischen Abbildung mit Parameter a
sequenz=zeros(n,1);
data=zeros(n,1);
x=rand;
for k=1:transient
   x=a*x*(1-x); 
end
for k=1:n
    x=a*x*(1-x);
    sequenz(k)=round(x);
    data(k)=x;
end

