A285503 Positions of 1 in A285501; complement of A285502.

3, 4, 7, 8, 11, 12, 15, 16, 17, 18, 19, 20, 23, 24, 27, 28, 29, 30, 31, 32, 35, 36, 39, 40, 43, 44, 47, 48, 51, 52, 55, 56, 57, 58, 59, 60, 63, 64, 67, 68, 69, 70, 71, 72, 75, 76, 79, 80, 83, 84, 87, 88, 91, 92, 95, 96, 97, 98, 99, 100, 103, 104, 107, 108

Offset

1,1

Comments

Conjecture: a(n)/n -> (1+sqrt(5))/2 = golden ratio (A001622).

Links

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

Example

As a word, A285501 = 00110011..., in which 1 is in positions 3,4,7,8,11,...

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. A001622, A285501, A285503, A285504.

Sequence in context: A187582 A288553 A295771 * A327221 A014601 A154708

Adjacent sequences: A285500 A285501 A285502 * A285504 A285505 A285506

Keyword

nonn,easy

Author

Clark Kimberling, Apr 30 2017

Status

approved