|
Search: id:A110010
|
|
|
| A110010 |
|
a(n)=n-F(F(F(F(n)))) where F(x)=floor(phi*floor(x/phi)) and phi=(1+sqrt(5))/2. |
|
+0 1
|
|
| 1, 2, 3, 4, 5, 6, 6, 7, 6, 6, 7, 6, 5, 6, 6, 7, 6, 6, 7, 6, 7, 6, 6, 7, 6, 5, 6, 6, 7, 6, 6, 7, 6, 5, 6, 6, 7, 6, 6, 7, 6, 7, 6, 6, 7, 6, 5, 6, 6, 7, 6, 6, 7, 6, 7, 6, 6, 7, 6, 5, 6, 6, 7, 6, 6, 7, 6, 5, 6, 6, 7, 6, 6, 7, 6, 7, 6, 6, 7, 6, 5, 6, 6, 7, 6, 6, 7, 6, 5, 6, 6, 7, 6, 6, 7, 6, 7, 6, 6, 7, 6, 5, 6, 6, 7
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
To built the sequence start from the infinite Fibonacci word b(k)=floor(k/phi)-floor((k-1)/phi) for k>=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 {5,6,6} and each 1 by the block {7, 6, 6, 7, 6}. Append the initial string {1,2,3,4}.
|
|
REFERENCES
|
B. Cloitre, On properties of irrational numbers related to the floor function, in preparation, 2005
|
|
PROGRAM
|
(PARI) F(x)=floor((1+sqrt(5))/2*floor((-1+sqrt(5))/2*x)); a(n)=n-F(F(F(F(n))))
|
|
CROSSREFS
|
Cf. A003842 (case a(n)=n-floor(phi*floor(phi^-1*n)), A005614 (infinite Fibonacci binary word).
Sequence in context: A097623 A069754 A097622 this_sequence A091987 A025544 A121856
Adjacent sequences: A110007 A110008 A110009 this_sequence A110011 A110012 A110013
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Benoit Cloitre (benoit7848c(AT)orange.fr), Sep 02 2005
|
|
|
Search completed in 0.002 seconds
|