A284959 Positions of 1 in A284957; complement of A284958.

1, 3, 5, 10, 12, 14, 16, 21, 23, 25, 27, 32, 37, 42, 47, 49, 51, 53, 58, 60, 62, 64, 69, 71, 73, 75, 80, 82, 84, 86, 91, 96, 101, 106, 108, 110, 112, 117, 119, 121, 123, 128, 130, 132, 134, 139, 141, 143, 145, 150, 155, 160, 165, 167, 169, 171, 176, 181, 186

Offset

1,2

Comments

Conjecture: a(n)/n -> (3 + sqrt(13))/2.

Links

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

Example

As a word, A284957 = 10101000010..., in which 1 is in positions 1,3,5,10,...

Mathematica

s = Nest[Flatten[# /. {0 -> {1, 0}, 1 -> {0, 0, 0}}] &, {0}, 9]; (* A284957 *)
Flatten[Position[s, 0]]; (* A284958  *)
Flatten[Position[s, 1]];  (* A284959 *)

Crossrefs

Cf. A284958, A284959.

Sequence in context: A321793 A075741 A119133 * A336531 A285415 A275668

Adjacent sequences: A284956 A284957 A284958 * A284960 A284961 A284962

Keyword

nonn,easy

Author

Clark Kimberling, Apr 18 2017

Status

approved