|
| |
| |
|
|
|
0, 2, 7, 44, 354, 3328, 35144, 407984, 5137824, 69566144, 1006372864, 15481560064, 252326173824, 4344015683584, 78793242566144, 1502374856981504, 30052439647908864, 629485600310349824, 13783057303819485184
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
PROG
| (PARI) {a(n)=local(M=matrix(n+2, n+2, m, j, if(m==j, 1, if(m==j+1, -m+1, -(m-j-1)*polcoeff(log(sum(i=0, m, (i+3)!/3!*x^i)), m-j-1))))); if(n<0, 0, sum(i=1, #M, (M^0-M)^i/i)[n+2, 2])}
|
|
|
CROSSREFS
| Cf. A111560, A111553.
Sequence in context: A041507 A158107 A145073 * A000155 A077045 A178012
Adjacent sequences: A111558 A111559 A111560 * A111562 A111563 A111564
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Paul D. Hanna (pauldhanna(AT)juno.com), Aug 07 2005
|
| |
|
|
