|
| |
|
|
A092868
|
|
Coefficients c[r,n] in Schmidt's problem Sum[Binomial[n,k]^r Binomial[n+k,k]^r,{k,0,n}] == Sum[Binomial[n,k]Binomial[n+k,k]c[r,k],{k,0,n}] for r=4.
|
|
1
| |
|
|
1, 8, 424, 48896, 6672232, 1022309408, 176808084544, 33055112886272, 6507475475389288, 1336577286762538496, 284198765977135568224, 62135041920796512325952, 13901968841738902540019776
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
LINKS
| Eric Weisstein's World of Mathematics, Schmidt's Problem
|
|
|
MATHEMATICA
| c[4, n_] := Sum[Binomial[2j, j]^3Binomial[n, j]Binomial[k+j, k-j]Binomial[j, n-k]Binomial[k, j]Binomial[2j, k-j], {k, 0, n}, {j, 0, n}]
|
|
|
CROSSREFS
| Cf. A000172, A000658.
Fourth row of array A094424.
Sequence in context: A193372 A185833 A038781 * A038782 A024110 A132099
Adjacent sequences: A092865 A092866 A092867 * A092869 A092870 A092871
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Eric Weisstein (eric(AT)weisstein.com), Mar 08, 2004
|
| |
|
|
