A285598 Positions of 1 in A285596; complement of A285597.

2, 3, 4, 6, 7, 8, 9, 10, 12, 13, 14, 16, 17, 18, 20, 21, 22, 23, 24, 26, 27, 28, 30, 31, 32, 34, 35, 36, 37, 38, 40, 41, 42, 44, 45, 46, 48, 49, 50, 52, 53, 54, 56, 57, 58, 59, 60, 62, 63, 64, 66, 67, 68, 70, 71, 72, 73, 74, 76, 77, 78, 80, 81, 82, 84, 85

Offset

1,1

Comments

Conjecture: a(n)/n -> (1+sqrt(17))/4.

Links

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

Example

As a word, A285596 = 011101111101110..., in which 1 is in positions 2,3,4,6,7,...

Mathematica

s = Nest[Flatten[# /. {0 -> {1, 1}, 1 -> {0, 1, 1, 1}}] &, {0}, 10] (* A285596 *)
Flatten[Position[s, 0]]  (* A285597 *)
Flatten[Position[s, 1]]  (* A285598 *)

Crossrefs

Cf. A285596, A285597, A285599.

Sequence in context: A175439 A048264 A260816 * A275804 A141825 A238369

Adjacent sequences: A285595 A285596 A285597 * A285599 A285600 A285601

Keyword

nonn,easy

Author

Clark Kimberling, May 01 2017

Status

approved