|
| |
|
|
A110006
|
|
a(n)=n-floor(phi*floor(phi^-1*floor(phi*floor(phi^-1*n)))) where phi=(1+sqrt(5))/2.
|
|
0
| |
|
|
1, 2, 3, 3, 2, 3, 3, 4, 3, 2, 3, 3, 2, 3, 3, 4, 3, 2, 3, 3, 4, 3, 2, 3, 3, 2, 3, 3, 4, 3, 2, 3, 3, 2, 3, 3, 4, 3, 2, 3, 3, 4, 3, 2, 3, 3, 2, 3, 3, 4, 3, 2, 3, 3, 4, 3, 2, 3, 3, 2, 3, 3, 4, 3, 2, 3, 3, 2, 3, 3, 4, 3, 2, 3, 3, 4, 3, 2, 3, 3, 2, 3, 3, 4, 3, 2, 3, 3, 2, 3, 3, 4, 3, 2, 3, 3, 4, 3, 2, 3, 3, 2, 3, 3, 4
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| To built the sequence start from the infinite Fibonacci word : b(n)=floor(n/phi)-floor((n-1)/phi) for n>=1 giving 0,1,0,1,1,0,1,0,1,1,0,1,1,0,1,0,1,1,..... Then replace each 0 by the block {2,3,3} and each 1 by the block {2,3,3,4,3}. Append an initial 1.
|
|
|
REFERENCES
| B. Cloitre, On properties of irrational numbers related to the floor function, in preparation, 2005
|
|
|
PROG
| (PARI) a(n)=n-floor((1+sqrt(5))/2*floor((-1+sqrt(5))/2*floor((1+sqrt(5))/2*floor((-1+sqrt(5))/2*n))))
|
|
|
CROSSREFS
| Cf. A003842 (case a(n)=n-floor(phi*floor(phi^-1*n)), A005614 (infinite Fibonacci binary word).
Sequence in context: A102313 A007538 A025076 * A137779 A191246 A107918
Adjacent sequences: A110003 A110004 A110005 * A110007 A110008 A110009
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Benoit Cloitre (benoit7848c(AT)orange.fr), Sep 02 2005
|
| |
|
|
