# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a248968
Showing 1-1 of 1

%I A248968 #13 Mar 06 2021 02:07:00
%S A248968 2,9,4,3,5,8,6,3,2,2,7,3,8,5,3,5,4,0,0,7,6,0,0,6,2,8,4,6,4,9,3,1,6,3,
%T A248968 4,8,8,7,5,0,1,4,0,2,3,8,0,9,6,3,9,6,3,2,6,6,3,3,6,1,5,1,4,2,9,0,8,0,
%U A248968 9,7,5,0,3,7,1,5,0,6,3,6,6,6,5,7,8,6
%N A248968 Decimal expansion of the area bounded by x = 1, y = sin(1/x), and y = tan(1/x).
%H A248968 Clark Kimberling, <a href="/A248968/b248968.txt">Table of n, a(n) for n = 0..300</a>
%F A248968 Let u,v,w be the constants at A248965, A248967, and A248968, respectively.  Then w = u + v.
%e A248968 area = 0.294358632273853540076006284649...
%p A248968 evalf(int(tan(1/x)-sin(1/x), x = 1..infinity), 120); # _Vaclav Kotesovec_, Oct 20 2014
%t A248968 v = Integrate[Tan[1/x] - Sin[1/x], {x, 1, Infinity}]
%t A248968 N[v, 100]
%t A248968 s = RealDigits[N[v, 200]][[1]] (* A248968 *)
%t A248968 Plot[{Tan[1/x], Sin[1/x]}, {x, 1, Pi}]
%Y A248968 Cf. A248965, A248966, A248967.
%K A248968 nonn,easy,cons
%O A248968 0,1
%A A248968 _Clark Kimberling_, Oct 18 2014

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE