|
|
A332539
|
|
Denominators of coefficients in a series for log(2 Pi).
|
|
1
|
|
|
2, 4, 24, 432, 120, 8640, 24192, 313600, 2073600, 78382080, 532224000, 2212987392000, 237758976000, 135998134272000, 33798352896000, 28245766348800000, 17072996548608000, 9142589651779584000, 3606419447414784000, 16427702944441958400000, 177473799122780160000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
The reference gives an explicit formula in terms of the Gregory numbers G_n = A002206/A002207.
|
|
MATHEMATICA
|
g[n_] := -(-1)^n*Sum[StirlingS1[n, j]/(j + 1), {j, 1, n}]/n!; Flatten[{2, Denominator[Table[Sum[g[k]*g[n + 1 - k], {k, 1, n}]/n, {n, 1, 30}]]}] (* Vaclav Kotesovec, Feb 16 2020 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,frac
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|