|
Search: id:A081147
|
|
|
| A081147 |
|
Differences of Beatty sequence for square root of 5. |
|
+0
2
|
|
| 2, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
COMMENT
|
Let S(0) = 2; obtain S(k) from S(k-1) by applying 2 ->2223, 3 -> 22223; sequence is S(0), S(1), S(2), ...
|
|
FORMULA
|
a(n)=floor((n+1)*sqrt(5))-floor(n*sqrt(5))
|
|
MATHEMATICA
|
Flatten[ Table[ Nest[ Flatten[ # /. {2 -> {2, 2, 2, 3}, 3 -> {2, 2, 2, 2, 3}}] &, {2}, n], {n, 0, 4}]] (from Robert G. Wilson v (rgwv(AT)rgwv.com), May 07 2005)
|
|
PROGRAM
|
(PARI) a(n)=floor((n+1)*sqrt(5))-floor(n*sqrt(5))
|
|
CROSSREFS
|
Cf. A022839.
Sequence in context: A020649 A067131 A094915 this_sequence A083399 A105561 A087133
Adjacent sequences: A081144 A081145 A081146 this_sequence A081148 A081149 A081150
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Benoit Cloitre (benoit7848c(AT)orange.fr), Apr 16 2003
|
|
|
Search completed in 0.002 seconds
|
