|
Search: id:A104987
|
|
| |
|
| 0, 1, 4, 14, 58, 300, 1886, 13878, 116310, 1090500, 11296810, 128102714, 1578342010, 20998804576, 300081098918, 4584908039142, 74594230462318, 1287634918033836, 23506502407089874, 452508152936326482
(list; graph; listen)
|
|
|
OFFSET
|
0,3
|
|
|
PROGRAM
|
(PARI) {a(n)=sum(k=0, n, sum(p=1, n+1, (-1)^p*(matrix(n+1, n+1, m, j, if(m==j, 0, if(m==j+1, -m+1, -polcoeff((1-1/sum(i=0, m, i!*x^i))/x+O(x^m), m-j-1))))^p)[n+1, k+1]/p))}
|
|
CROSSREFS
|
Cf. A104986, A104980.
Sequence in context: A151489 A134826 A096242 this_sequence A149492 A111276 A149493
Adjacent sequences: A104984 A104985 A104986 this_sequence A104988 A104989 A104990
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Paul D. Hanna (pauldhanna(AT)juno.com), Apr 10 2005
|
|
|
Search completed in 0.002 seconds
|
