OFFSET
0,2
LINKS
Eric Weisstein's World of Mathematics, Barnes G-Function.
Wikipedia, Barnes G-function
FORMULA
a(n) = BarnesG(2*n + 2) / BarnesG(n + 1).
a(n) ~ 2^(2*n^2 + 5*n/2 + 11/12) * n^((n+1)*(3*n+1)/2) * Pi^((n+1)/2) / exp(9*n^2/4 + 2*n).
MAPLE
a:= proc(n) option remember; `if`(n=0, 1,
a(n-1) *(2*n-1)! *(2*n)! /(n-1)!)
end:
seq(a(n), n=0..7); # Alois P. Heinz, Jul 11 2024
MATHEMATICA
Table[Product[(n + k)!, {k, 0, n}], {n, 0, 10}]
Table[Product[(2*n - k)!, {k, 0, n}], {n, 0, 10}]
Table[BarnesG[2*n + 2]/BarnesG[n + 1], {n, 0, 10}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Dec 16 2017
EXTENSIONS
Missing a(0)=1 inserted by Georg Fischer, Nov 18 2021
STATUS
approved