A285506 Positions of 1 in A285504; complement of A285505.

1, 2, 3, 4, 7, 8, 11, 12, 13, 14, 15, 16, 19, 20, 23, 24, 25, 26, 27, 28, 31, 32, 35, 36, 37, 38, 39, 40, 43, 44, 47, 48, 51, 52, 55, 56, 59, 60, 63, 64, 65, 66, 67, 68, 71, 72, 75, 76, 77, 78, 79, 80, 83, 84, 87, 88, 91, 92, 95, 96, 99, 100, 103, 104, 105

Offset

1,2

Comments

Conjecture: a(n)/n -> (1+sqrt(5))/2.

Links

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

Example

As a word, A285504 = 11110011001..., in which 1 is in positions 1,2,3,4,7,...

Mathematica

s = Nest[Flatten[# /. {0 -> {1, 1}, 1 -> {0, 0, 1, 1}}] &, {0}, 8] (* A285501 *)
Flatten[Position[s, 0]]  (* A285502 *)
Flatten[Position[s, 1]]  (* A285503 *)

Crossrefs

Cf. A285501, A285504, A285505.

Sequence in context: A333778 A272919 A343603 * A188190 A026808 A240767

Adjacent sequences: A285503 A285504 A285505 * A285507 A285508 A285509

Keyword

nonn,easy

Author

Clark Kimberling, Apr 30 2017

Status

approved