A277737 Positions of 1's in A277735.

2, 7, 9, 11, 15, 19, 24, 26, 31, 33, 38, 40, 42, 46, 51, 53, 55, 59, 64, 66, 68, 72, 76, 81, 83, 88, 90, 92, 96, 100, 105, 107, 112, 114, 116, 120, 124, 129, 131, 136, 138, 143, 145, 147, 151, 156, 158, 160, 164, 168, 173, 175, 180, 182, 187, 189, 191, 195, 200, 202, 204, 208, 212, 217, 219, 224, 226

Offset: 1

Author

N. J. A. Sloane, Nov 07 2016

Keywords

• nonn

Comments

{A277736, A277737, A277738} 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..19513

Crossrefs

Cf. A277735, A277736, A277738.

Cf. also A003144, A003145, A003146.

Programs

Maple

with(ListTools);
T:=proc(S) Flatten(subs( {0=[0,1], 1=[2,0], 2=[0]}, S)); end;
S:=[0];
for n from 1 to 14 do S:=T(S); od:
S; # A277735
p0:=[]: p1:=[]: p2:=[]:
for i from 1 to nops(S) do
j:=S[i];
if j=0 then p0:=[op(p0),i];
elif j=1 then p1:=[op(p1),i];
else p2:=[op(p2),i]; fi: od:
p0; # A277736
p1; # A277737
p2: # A277738