|
| |
|
|
A074649
|
|
a(0) = 1; for n >= 1, a(n) = sum(binomial(n,k)^3*binomial(n+k,k+1)^2,k = 0..n)/n^2.
|
|
3
| |
|
|
1, 2, 23, 434, 10897, 327270, 11076235, 408850370, 16119036965, 669177449258, 28960814900899, 1297024187184478, 59777126587203937, 2822927389747980806, 136132927766691327651, 6685542830954666301218, 333618582889745741654221
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
FORMULA
| Special values of the hypergeometric function 5F4, in Maple notation : a(n)= hypergeom([n+1, n+1, -n, -n, -n], [1, 1, 2, 2], -1), n=0, 1...
|
|
|
MATHEMATICA
| a[0] = 1; a[n_] := Sum[Binomial[n, k]^3*Binomial[n + k, k + 1]^2, {k, 0, n}]/n^2; Table[a[n], {n, 0, 16}]
|
|
|
CROSSREFS
| Cf. A074635.
Sequence in context: A197740 A060941 A119774 * A134355 A187656 A054260
Adjacent sequences: A074646 A074647 A074648 * A074650 A074651 A074652
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Karol A. Penson (penson(AT)lptl.jussieu.fr), Aug 28 2002
|
|
|
EXTENSIONS
| Edited by Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 29 2002
|
| |
|
|
