|
|
|
|
2, 3, 10, 11, 14, 15, 18, 19, 22, 23, 26, 27, 30, 31, 38, 39, 42, 43, 50, 51, 54, 55, 62, 63, 66, 67, 74, 75, 78, 79, 86, 87, 90, 91, 98, 99, 102, 103, 106, 107, 110, 111, 114, 115, 118, 119, 126, 127, 130, 131, 138, 139, 142, 143, 146, 147, 150, 151, 154
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Conjecture: a(n)/n -> (3 + sqrt(5))/2.
|
|
LINKS
|
|
|
EXAMPLE
|
As a word, A285621 = 10011111100110..., in which 0 is in positions 2,3,10,11,14,...
|
|
MATHEMATICA
|
s = Nest[Flatten[# /. {0 -> {1, 1}, 1 -> {1, 0, 0, 1}}] &, {0}, 10] (* A285621 *)
Flatten[Position[s, 0]] (* A285622 *)
Flatten[Position[s, 1]] (* A285623 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|