A287331 -id:A287331 - cp's OEIS frontend

A287332 Positions of 0 in A287331.

2, 4, 5, 6, 10, 12, 14, 15, 16, 20, 21, 22, 26, 27, 28, 32, 36, 40, 42, 44, 45, 46, 50, 52, 54, 55, 56, 60, 62, 64, 65, 66, 70, 71, 72, 76, 77, 78, 82, 86, 90, 92, 94, 95, 96, 100, 101, 102, 106, 107, 108, 112, 116, 120, 122, 124, 125, 126, 130, 131, 132

Offset: 1

Clark Kimberling, May 23 2017

Clark Kimberling, Table of n, a(n) for n = 1..10000

Cf. A287331, A287333, A287334.

s = Nest[Flatten[# /. {0 -> {1, 0}, 1 -> {2, 2}, 2 -> 0}] &, {0}, 10] (* A287331 *)
Flatten[Position[s, 0]] (* A287332 *)
Flatten[Position[s, 1]] (* A287333 *)
Flatten[Position[s, 2]] (* A287334 *)

A287333 Positions of 1 in A287331.

Original entry on oeis.org

1, 3, 9, 11, 13, 19, 25, 31, 35, 39, 41, 43, 49, 51, 53, 59, 61, 63, 69, 75, 81, 85, 89, 91, 93, 99, 105, 111, 115, 119, 121, 123, 129, 135, 141, 145, 149, 151, 153, 159, 163, 167, 169, 171, 177, 181, 185, 187, 189, 195, 197, 199, 205, 207, 209, 215, 221

Offset: 1

Clark Kimberling, May 23 2017

Clark Kimberling, Table of n, a(n) for n = 1..10000

Cf. A287331, A287332, A287334.

s = Nest[Flatten[# /. {0 -> {1, 0}, 1 -> {2, 2}, 2 -> 0}] &, {0}, 10] (* A287331 *)
Flatten[Position[s, 0]] (* A287332 *)
Flatten[Position[s, 1]] (* A287333 *)
Flatten[Position[s, 2]] (* A287334 *)

A287334 Positions of 2 in A287331.

Original entry on oeis.org

7, 8, 17, 18, 23, 24, 29, 30, 33, 34, 37, 38, 47, 48, 57, 58, 67, 68, 73, 74, 79, 80, 83, 84, 87, 88, 97, 98, 103, 104, 109, 110, 113, 114, 117, 118, 127, 128, 133, 134, 139, 140, 143, 144, 147, 148, 157, 158, 161, 162, 165, 166, 175, 176, 179, 180, 183, 184

Offset: 1

Clark Kimberling, May 23 2017

Clark Kimberling, Table of n, a(n) for n = 1..10000

Cf. A287331, A287332, A287333.

s = Nest[Flatten[# /. {0 -> {1, 0}, 1 -> {2, 2}, 2 -> 0}] &, {0}, 10] (* A287331 *)
Flatten[Position[s, 0]] (* A287332 *)
Flatten[Position[s, 1]] (* A287333 *)
Flatten[Position[s, 2]] (* A287334 *)

cp's OEIS Frontend

A287332 Positions of 0 in A287331.

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

A287333 Positions of 1 in A287331.

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

A287334 Positions of 2 in A287331.

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica