|
| |
|
|
A123026
|
|
Let a0 = 1; b0 = -2; c0 = -1; a(n) = a(n-2)*(a0*n^2+b0*n+c0)/(n*(n-1)).
|
|
0
| |
|
|
1, 1, -1, 2, -7, 28, -161, 952, -7567, 59024, -597793, 5784352, -71137367, 821377984, -11879940289, 159347328896, -2649226684447, 40474221539584, -760328058436289, 13032699335746048, -272957772978627751, 5187014335626927104, -119828462337617582689, 2500140909772178864128
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,4
|
|
|
MATHEMATICA
| a0 = 1; b0 = -2; c0 = -1; a[n_] := a[n] = (a0*n^2 + b0*n + c0)*a[n - 2]/(n*(n - 1)); a[0] = 1; a[1] = 1; Table[ExpandAll[a[n]*n! ], {n, 0, 30}]
|
|
|
CROSSREFS
| Sequence in context: A030897 A030946 A030906 * A013011 A013181 A191478
Adjacent sequences: A123023 A123024 A123025 * A123027 A123028 A123029
|
|
|
KEYWORD
| sign
|
|
|
AUTHOR
| Roger Bagula (rlbagulatftn(AT)yahoo.com), Sep 24 2006
|
|
|
EXTENSIONS
| Edited by N. J. A. Sloane (njas(AT)research.att.com), Oct 01 2006
|
| |
|
|
