Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A051104
Denominator of a certain Selberg integral.
1
12, 75, 147000, 165375, 800415, 2840672835, 9909900, 46539367875, 218409253437375, 7392313193265, 32318460158985, 127542494555994375, 293662931252315625, 35281503597599634375, 64581952299606187875, 28179258520061499976125, 3412712969557621104375
OFFSET
1,1
REFERENCES
Donald St. P. Richards, Analogs and extensions of Selberg's integrals, pp. 108-137 of D. Stanton, Ed., "q-Series and Partitions", Springer, 1989, see esp. p. 125.
EXAMPLE
1/12, 2/75, 2243/147000, 1954/165375, 8798/800415, ...
MATHEMATICA
a[n_] := Denominator[2^n*3/((n + 1)^2*(2*n + 1)*(4*n + 3)) * HypergeometricPFQ[{-n, 1, 1}, {n + 2, 1/2 - n}, 1/4]]; Array[a, 20] (* Amiram Eldar, Jul 05 2021 *)
CROSSREFS
Cf. A051103 (numerators).
Sequence in context: A368530 A006235 A009642 * A044199 A044580 A075279
KEYWORD
nonn,frac
EXTENSIONS
a(3) corrected and more terms added by Amiram Eldar, Jul 05 2021
STATUS
approved