



1, 3, 7, 10, 11, 13, 15, 19, 22, 23, 27, 28, 32, 33, 35, 37, 41, 44, 45, 49, 50, 52, 54, 58, 59, 61, 65, 68, 69, 71, 73, 77, 80, 81, 83, 85, 89, 92, 93, 97, 98, 102, 103, 105, 107, 111, 114, 115, 119, 120, 122, 124, 128, 129, 131, 135, 138, 139, 143, 144
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,2


COMMENTS

Conjecture: 1 < n*r  a(n) < 2 for n>=1, where r = 1 + sqrt(2).


LINKS

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


EXAMPLE

As a word, A285034 = 10100010..., in which 1 is in positions 1,3,7,10,...


MATHEMATICA

s = Nest[Flatten[# /. {0 > {1, 0}, 1 > {0, 0, 1}}] &, {0}, 9]; (* A285034 *)
Flatten[Position[s, 0]]; (* A285035 *)
Flatten[Position[s, 1]]; (* A285036 *)


CROSSREFS

Cf. A285034, A285036.
Sequence in context: A138935 A030325 A095947 * A188081 A188091 A190677
Adjacent sequences: A285033 A285034 A285035 * A285037 A285038 A285039


KEYWORD

nonn,easy


AUTHOR

Clark Kimberling, Apr 19 2017


STATUS

approved



