%I A092412
%S A092412 1,2,1,3,1,2,1,0,1,2,1,3,1,2,1,1,1,2,1,3,1,2,1,0,1,2,1,3,1,2,1,2,1,2,1,
%T A092412 3,1,2,1,0,1,2,1,3,1,2,1,1,1,2,1,3,1,2,1,0,1,2,1,3,1,2,1,3,1,2,1,3,1,2,
%U A092412 1,0,1,2,1,3,1,2,1,1,1,2,1,3,1,2,1,0,1,2,1,3,1,2,1,2,1,2,1,3,1,2,1,0
%N A092412 Fixed point of the morphism 0->11, 1->12, 2->13, 3->10, starting from 
               a(1) = 1.
%F A092412 a(n) = A001511(n) mod 4 . a(2n+1) = 1; a(2n) = a(n) + 1 mod 4 . a(n) 
               = A035263(n) mod 2; a(n) = A033485(n) mod 2.
%t A092412 Nest[ Function[ l, {Flatten[(l /. {0 -> {1, 1}, 1 -> {1, 2}, 2 -> {1, 
               3}, 3 -> {1, 0}})] }], {0}, 7] (from Robert G. Wilson v Mar 04 2005)
%Y A092412 Sequence in context: A123864 A035175 A106406 this_sequence A078734 A028293 
               A092782
%Y A092412 Adjacent sequences: A092409 A092410 A092411 this_sequence A092413 A092414 
               A092415
%K A092412 easy,nonn
%O A092412 1,2
%A A092412 DELEHAM Philippe (kolotoko(AT)wanadoo.fr), Mar 22 2004