This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A191255 Fixed point of the morphism 0->01, 1->02, 2->03, 3->01. 6

%I

%S 0,1,0,2,0,1,0,3,0,1,0,2,0,1,0,1,0,1,0,2,0,1,0,3,0,1,0,2,0,1,0,2,0,1,

%T 0,2,0,1,0,3,0,1,0,2,0,1,0,1,0,1,0,2,0,1,0,3,0,1,0,2,0,1,0,3,0,1,0,2,

%U 0,1,0,3,0,1,0,2,0,1,0,1,0,1,0,2,0,1,0,3,0,1,0,2,0,1,0,2,0,1,0,2,0,1,0,3,0,1,0,2,0,1,0,1,0,1,0,2,0,1,0,3,0,1,0,2,0,1,0,1,0,1,0,2

%N Fixed point of the morphism 0->01, 1->02, 2->03, 3->01.

%C See A191250.

%t t = Nest[Flatten[# /. {0 -> {0, 1}, 1 -> {0, 2}, 2 -> {0, 3}, 3 -> {0, 1}}] &, {0}, 9] (* A191255 *)

%t Flatten[Position[t, 0]] (* A005408, the odds *)

%t a = Flatten[Position[t, 1]] (* A067368 conjectured *)

%t b = Flatten[Position[t, 2]] (* A191256 *)

%t a/2 (* A191257 *)

%t b/4 (* a/2 ? *)

%Y Cf. A191250, A191256, A191257.

%K nonn

%O 1,4

%A _Clark Kimberling_, May 28 2011

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
Recent Additions | More pages | Superseeker | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement .