A277734 Positions of 2's in A277731.

5, 10, 16, 21, 29, 34, 40, 45, 53, 58, 63, 69, 74, 82, 87, 93, 98, 106, 111, 116, 122, 127, 133, 138, 146, 151, 157, 162, 170, 175, 180, 186, 191, 199, 204, 210, 215, 223, 228, 233, 239, 244, 250, 255, 263, 268, 274, 279, 287, 292, 298, 303, 311, 316, 321, 327, 332, 340, 345, 351, 356, 364, 369, 374

Offset

1,1

Comments

{A277732, A277733, A277734} forms a three-way partition of the positive integers, similar to {A003144, A003145, A003146}.

Links

N. J. A. Sloane, Table of n, a(n) for n = 1..10000

Maple

See A277732.

Mathematica

m = 1000; (* number of terms of A277731 *)
S[1] = {0};
S[n_] := S[n] = SubstitutionSystem[{0 -> {0, 1}, 1 -> {0, 1, 2}, 2 -> {0}}, S[n - 1]];
For[n = 2, True, n++, If[PadRight[S[n], m] == PadRight[S[n - 1], m], Print["n = ", n]; Break[]]];
A277731 = Take[S[n], m];
Position[A277731, 2] // Flatten (* Jean-François Alcover, Mar 20 2023 *)

Crossrefs

Cf. A052980, A277731, A277732, A277733.

Cf. also A003144, A003145, A003146.

Sequence in context: A313900 A313901 A313902 * A313903 A313904 A313905

Adjacent sequences: A277731 A277732 A277733 * A277735 A277736 A277737

Keyword

nonn

Author

N. J. A. Sloane, Nov 07 2016

Status

approved