[go: up one dir, main page]

login
A285422
Positions of 0 in A285421; complement of A285423.
3
3, 6, 11, 14, 17, 20, 25, 28, 33, 36, 39, 42, 47, 50, 55, 58, 63, 66, 71, 74, 77, 80, 85, 88, 93, 96, 99, 102, 107, 110, 115, 118, 121, 124, 129, 132, 137, 140, 143, 146, 151, 154, 159, 162, 167, 170, 175, 178, 181, 184, 189, 192, 197, 200, 203, 206, 211
OFFSET
1,1
COMMENTS
Conjecture: -1 < n*r - a(n) < 5 for n>=1, where r = 2 + sqrt(3).
LINKS
EXAMPLE
As a word, A285421 = 110110111101..., in which 0 is in positions 3,6,11,14,...
MATHEMATICA
s = Nest[Flatten[# /. {0 -> {1, 1}, 1 -> {0, 1, 1}}] &, {0}, 11] (* A285421 *)
Flatten[Position[s, 0]] (* A285422 *)
Flatten[Position[s, 1]] (* A285423 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Apr 28 2017
STATUS
approved