A305495
Positions of 0 in the fixed point of the morphism 0->120, 1->110, 2->100 applied to 1 (as in A305490).
Original entry on oeis.org
3, 6, 9, 12, 15, 18, 21, 23, 24, 27, 30, 33, 36, 39, 42, 45, 48, 50, 51, 54, 57, 60, 63, 66, 69, 72, 75, 77, 78, 81, 84, 87, 90, 93, 96, 99, 102, 104, 105, 108, 111, 114, 117, 120, 123, 126, 129, 131, 132, 135, 138, 141, 144, 147, 150, 153, 156, 158, 159
Offset: 1
Fixed point: (1, 1, 0, 1, 1, 0, 1, 2, 0, 1, 1, 0, 1, 1, 0, 1, 2, 0, 1, 1, ... )
Positions of 0: (3,6,9,12,15,18,21,23, ... ) = A305495
Positions of 1: (1,2,4,5,7,10,11,13,14, ... ) = A189636
Positions of 2: (8,17,26,35,44,53,62,68, ... ) = A305496
-
z = 120;
t = Nest[Flatten[# /. {0 -> {1, 2, 0}, 1 -> {1, 1, 0},
2 -> {1, 0, 0}}] &, {0}, 9]; (* A305490 *)
Take[Flatten[Position[t, 0]], z] (* A305495 *)
Take[Flatten[Position[t, 1]], z] (* A116178 *)
Take[Flatten[Position[t, 2]], z] (* A305496 *)
A305496
Positions of 2 in the fixed point of the morphism 0->120, 1->110, 2->100 applied to 1 (as in A305490).
Original entry on oeis.org
8, 17, 26, 35, 44, 53, 62, 68, 71, 80, 89, 98, 107, 116, 125, 134, 143, 149, 152, 161, 170, 179, 188, 197, 206, 215, 224, 230, 233, 242, 251, 260, 269, 278, 287, 296, 305, 311, 314, 323, 332, 341, 350, 359, 368, 377, 386, 392, 395, 404, 413, 422, 431, 440
Offset: 1
Fixed point: (1, 1, 0, 1, 1, 0, 1, 2, 0, 1, 1, 0, 1, 1, 0, 1, 2, 0, 1, 1, ... )
Positions of 0: (3,6,9,12,15,18,21,23, ... ) = A305495
Positions of 1: (1,2,4,5,7,10,11,13,14, ... ) = A189636
Positions of 2: (8,17,26,35,44,53,62,68, ... ) = A305496
-
z = 120;
t = Nest[Flatten[# /. {0 -> {1, 2, 0}, 1 -> {1, 1, 0},
2 -> {1, 0, 0}}] &, {0}, 9]; (* A305490 *)
Take[Flatten[Position[t, 0]], z] (* A305495 *)
Take[Flatten[Position[t, 1]], z] (* A116178 *)
Take[Flatten[Position[t, 2]], z] (* A305496 *)
Position[SubstitutionSystem[{0->{1,2,0},1->{1,1,0},2->{1,0,0}},{1},{6}][[1]],2]//Flatten (* Harvey P. Dale, May 03 2022 *)
Showing 1-2 of 2 results.
Comments