|
|
A301392
|
|
a(n) = Product_{k=1..L} hypergeom([-n, -n], [1], k) with L = 3.
|
|
1
|
|
|
1, 24, 1716, 171360, 19908420, 2520945504, 337515951696, 46988523863424, 6733620845342820, 986687339945804640, 147160710112066546896, 22266479585813841915264, 3409510715450350579710096, 527349554424095532928444800, 82268694346361937381278049600
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
Recurrence: (n-2)*(n-1)*n^3*(2*n - 5)*a(n) = 24*(n-2)*(n-1)*(2*n - 5)*(2*n - 1)^3*a(n-1) - 32*(n-2)*(2*n - 3)^2*(2*n - 1)*(25*n^2 - 75*n + 31)*a(n-2) + 384*(2*n - 5)^3*(2*n - 3)*(2*n - 1)^2*a(n-3) - 256*(n-3)*(2*n - 7)*(2*n - 5)*(2*n - 3)*(2*n - 1)^2*a(n-4). - Vaclav Kotesovec, Mar 26 2018
|
|
MAPLE
|
a := n -> mul(hypergeom([-n, -n], [1], k), k=1..3):
seq(simplify(a(k)), k=0..11);
|
|
MATHEMATICA
|
a[n_] := Product[Hypergeometric2F1[-n, -n, 1, k], {k, 1, 3}];
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|