A277003 Denominators of an asymptotic series for the Gamma function (odd power series).

24, 2880, 40320, 215040, 608256, 738017280, 1277952, 4010803200, 32006209536, 65745715200, 1736441856, 12641296711680, 10066329600, 12611097722880, 1337897345089536, 1086454927196160, 3401614098432, 83088011510887219200, 61022895341568

Offset

1,1

Comments

For formulas and references see A277002 which is the main entry for this rational sequence.

Links

Table of n, a(n) for n=1..19.

Formula

a(n) = denominator(b(2*n-1)) with b(n) = Bernoulli(n+1, 1/2)/(n*(n+1)) for n>=1, b(0)=0.

Example

The underlying rational sequence b(n) starts:
0, -1/24, 0, 7/2880, 0, -31/40320, 0, 127/215040, 0, -511/608256, ...

Maple

b := n -> `if`(n=0, 0, bernoulli(n+1, 1/2)/(n*(n+1))):
a := n -> denom(b(2*n-1)):
seq(a(n), n=1..19);

Mathematica

b[n_] := BernoulliB[n+1, 1/2]/(n(n+1));
a[n_] := Denominator[b[2n-1]];
Array[a, 19] (* Jean-François Alcover, Sep 09 2018 *)

Crossrefs

Cf. A277002 (numerators), A277000/A277001 (even power series).

Sequence in context: A092706 A209708 A266870 * A060902 A090444 A205795

Adjacent sequences: A277000 A277001 A277002 * A277004 A277005 A277006

Keyword

nonn,frac

Author

Peter Luschny, Sep 26 2016

Status

approved