|
%I #33 Dec 03 2022 16:01:50
%S 1,1,-1,1,-1,1,-691,1,-3617,43867,-174611,77683,-236364091,657931,
%T -3392780147,1723168255201,-7709321041217,151628697551,
%U -26315271553053477373,154210205991661,-261082718496449122051,1520097643918070802691,-2530297234481911294093
%N a(n) = numerator of Bernoulli(2*n)/(2*n + 1)!. Bisection of A120082.
%C Numerators of the Taylor expansion coefficients of the Debye function D(1,x) at the even powers of x.
%H Peter Luschny, <a href="/A141590/b141590.txt">Table of n, a(n) for n = 0..300</a>
%H Kevin Acres, David Broadhurst, <a href="https://arxiv.org/1810.07478">Eta quotients and Rademacher sums</a>, arXiv:1810.07478 [math.NT], 2018.
%F a(n) = A120082(2*n).
%e Note that a(34) = -125235502160125163977598011460214000388469 but A255505(34) = -4633713579924631067171126424027918014373353.
%p A141590 := proc(n) A120082(2*n) end:
%p seq(A141590(n), n=0..30) ; # _R. J. Mathar_, Sep 03 2009
%p seq(numer(bernoulli(2*n)/(2*n+1)!), n=0..34); # _Peter Luschny_, Dec 03 2022
%Y Cf. A120082, A000367, A255505, A001067, A046968.
%K sign,frac
%O 0,7
%A _Paul Curtz_, Aug 20 2008
%E Edited and extended by _R. J. Mathar_, Sep 03 2009
%E Edited by _Peter Luschny_, Dec 03 2022
|
