x=1.5;X=[1.5 1.5];Y=[x];
for k=1:10
  x=2*sin(x);
  X=[X,x,x];Y=[Y,x,x]
  end
   X=X(1:(size(X,2)-1))
