|
|
A084149
|
|
Denominators of terms in the Pippenger product.
|
|
2
|
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
a(n) = denominator(((2^(n-1)-1)!!*(2^n)!!/((2^(n-1))!!*(2^n-1)!!))^2/2). - Amiram Eldar, Apr 10 2022
a(n) = denominator( 2^(2^n -1)*((2^(n-1))!)^6 / (((2^n)!)^2 * ((2^(n-2))!)^4) ), with a(1) = 1. - G. C. Greubel, Oct 13 2022
|
|
MATHEMATICA
|
a[n_] := Denominator[((2^(n - 1) - 1)!!*(2^n)!!/((2^(n - 1))!!*(2^n - 1)!!))^2/2]; Array[a, 7] (* Amiram Eldar, Apr 10 2022 *)
|
|
PROG
|
(Magma)
F:=Factorial;
A084149:= func< n | n eq 1 select 1 else Round(Denominator( 2^(2^n -1)*(F(2^(n-1)))^6 / ((F(2^n))^2 * (F(2^(n-2)))^4) )) >;
(SageMath)
f=factorial
def A084149(n): return 1 if (n==1) else denominator( 2^(2^n -1)*(f(2^(n-1)))^6 / ((f(2^n))^2 * (f(2^(n-2)))^4) )
|
|
CROSSREFS
|
|
|
KEYWORD
|
frac,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|