|
| |
|
|
A135296
|
|
A measure of quality (the higher the better) for the approximation to Pi by rationals A022853(n)/n.
|
|
0
| |
|
|
7, 3, 2, 2, 3, 6, 112, 7, 3, 2, 2, 3, 6, 56, 8, 3, 2, 2, 3, 5, 37, 8, 3, 2, 2, 3, 5, 28, 9, 4, 2, 2, 3, 5, 22, 10, 4, 2, 2, 2, 5, 18, 11, 4, 2, 2, 2, 4, 16, 12, 4, 2, 2, 2, 4, 14, 14, 4, 2, 2, 2, 4, 12, 16, 4, 2, 2, 2, 4, 11, 18, 5, 2, 2, 2, 4, 10, 22, 5, 3, 2, 2, 4, 9, 28, 5, 3, 2, 2
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
FORMULA
| a(n) = [1/|n*Pi-A022853(n)|].
|
|
|
EXAMPLE
| a(7)=112 because [1/|7*Pi-22|] = [1/|-0.0088514|] = [112.976] = 112.
|
|
|
MATHEMATICA
| a = {}; For[n = 1, n < 90, n++, AppendTo[a, Floor[1/(If[FractionalPart[n*Pi] > 1/2, Ceiling[n*Pi] - n*Pi, n*Pi - Floor[n*Pi]])]]]; a - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Dec 05 2007
|
|
|
CROSSREFS
| Cf. A022853.
Sequence in context: A033327 A024584 A132713 * A098907 A153205 A075564
Adjacent sequences: A135293 A135294 A135295 * A135297 A135298 A135299
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Franz Vrabec (franz.vrabec(AT)aon.at), Dec 04 2007
|
|
|
EXTENSIONS
| More terms from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Dec 05 2007
|
| |
|
|
