A285663 Positions of 1 in A285661; complement of A285662.

1, 2, 5, 6, 9, 10, 11, 12, 13, 14, 17, 18, 21, 22, 23, 24, 25, 26, 29, 30, 33, 34, 37, 38, 41, 42, 45, 46, 49, 50, 51, 52, 53, 54, 57, 58, 61, 62, 63, 64, 65, 66, 69, 70, 73, 74, 77, 78, 81, 82, 85, 86, 89, 90, 91, 92, 93, 94, 97, 98, 101, 102, 103, 104, 105

Offset

1,2

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, A285661 = 110011001..., in which 1 is in positions 1,2,5,6,9,...

Mathematica

s = Nest[Flatten[# /. {0 -> {1, 1}, 1 -> {1, 1, 0, 0}}] &, {0}, 9]  (* A285661 *)
Flatten[Position[s, 0]]  (* A285662 *)
Flatten[Position[s, 1]]  (* A285663 *)

Crossrefs

Cf. A285662, A285663.

Sequence in context: A351830 A244272 A007573 * A143909 A284507 A284492

Adjacent sequences: A285660 A285661 A285662 * A285664 A285665 A285666

Keyword

nonn,easy

Author

Clark Kimberling, May 02 2017

Status

approved