Search: id:A092412 Results 1-1 of 1 results found. %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 Search completed in 0.001 seconds