|
Search: id:A107103
|
|
| |
|
| 1, -3, 12, -67, 495, -4596, 51583, -680037, 10306152, -176591665, 3376207461, -71258869848, 1645797382177, -41289185878227, 1118136109703460, -32509366699961371, 1010047705084550823, -33397162601828122332, 1170937325957822375167, -43391988679237460897205
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
COMMENT
|
Column 0 of triangle A107102 is signed A001515 (Bessel polynomial).
|
|
FORMULA
|
|a(n)| = 2*A001515(n)-A001515(n-1). - Vladeta Jovovic (vladeta(AT)Eunet.yu), Aug 10 2006
|
|
PROGRAM
|
(PARI) {a(n)=local(X=x+x^2*O(x^n), Y=y+y^2*O(y^n)); (matrix(n+2, n+2, m, k, if(m>=k, (m-1)!*polcoeff(polcoeff(exp(X+Y*X^2/2+X*Y), m-1, x), k-1, y)))^-1)[n+2, 2]}
|
|
CROSSREFS
|
Cf. A100862, A001515, A043301, A107102, A107104.
Adjacent sequences: A107100 A107101 A107102 this_sequence A107104 A107105 A107106
Sequence in context: A123227 A009362 A107713 this_sequence A107887 A121812 A039750
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Paul D. Hanna (pauldhanna(AT)juno.com), May 21 2005
|
|
|
Search completed in 0.002 seconds
|
