|
Search: id:A104991
|
|
| |
|
| 1, 4, 22, 142, 1048, 8704, 80386, 817786, 9093340, 109794556, 1431360958, 20047830262, 300343272952, 4793871035416, 81232799446906, 1456671526257106, 27562347560513524, 548844246683051860, 11474015910364016086
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
PROGRAM
|
(PARI) {a(n)=if(n<0, 0, sum(k=0, n, (matrix(n+1, n+1, m, j, if(m==j, 1, if(m==j+1, -m+1, -polcoeff((1-1/sum(i=0, m, i!*x^i))/x+O(x^m), m-j-1))))^-3)[n+1, k+1]))}
|
|
CROSSREFS
|
Cf. A104990, A104980.
Sequence in context: A003287 A077056 A045744 this_sequence A027391 A134988 A081002
Adjacent sequences: A104988 A104989 A104990 this_sequence A104992 A104993 A104994
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Paul D. Hanna (pauldhanna(AT)juno.com), Apr 10 2005
|
|
|
Search completed in 0.002 seconds
|
