OFFSET
1,1
LINKS
Clark Kimberling, Table of n, a(n) for n = 1..1000
EXAMPLE
area = 2.0366242672406191211213948107665304350...
MAPLE
evalf(int(Pi/x-sin(Pi/x), x = 1..infinity), 120); # Vaclav Kotesovec, Oct 20 2014
MATHEMATICA
v = Integrate[Pi/x - Sin[Pi/x], {x, 1, Infinity}]
N[v, 1000]
s = RealDigits[N[v, 1000]][[1]] (* A248966 *)
Plot[{Pi/x, Sin[Pi/x]}, {x, 1, 2*Pi}]
CROSSREFS
KEYWORD
AUTHOR
Clark Kimberling, Oct 18 2014
STATUS
approved