|
| |
|
|
A003013
|
|
Expansion of 1+x*exp(x)+x^2*exp(2*x).
|
|
2
| |
|
|
1, 1, 4, 15, 52, 165, 486, 1351, 3592, 9225, 23050, 56331, 135180, 319501, 745486, 1720335, 3932176, 8912913, 20054034, 44826643, 99614740, 220200981, 484442134, 1061158935, 2315255832, 5033164825
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,3
|
|
|
LINKS
| Index to sequences with linear recurrences with constant coefficients, signature (8,-25,38,-28,8)
|
|
|
FORMULA
| a(0) = 1, a(n) = (n^2-n)2^n/4 + n. a(n) = A002999(n) - n = A001815(n) + n. - Ralf Stephan (ralf(AT)ark.in-berlin.de), Sep 02 2003
O.g.f 1+x*(-1+4*x-8*x^2+6*x^3) ) / ( (x-1)^2*(2*x-1)^3 ). - R. J. Mathar, Mar 22 2011
a(0)=1, a(1)=1, a(2)=4, a(3)=15, a(4)=52, a(5)=165, a(n)= 8*a(n-1)- 25*a(n-2)+ 38*a(n-3)-28*a(n-4)+8*a(n-5) [From Harvey P. Dale, Nov 01 2011]
|
|
|
MATHEMATICA
| With[{nn=30}, CoefficientList[Series[1+x Exp[x]+x^2 Exp[2x], {x, 0, nn}], x] Range[0, nn]!] (* or *) Join[{1}, LinearRecurrence[{8, -25, 38, -28, 8}, {1, 4, 15, 52, 165}, 30]] (* From Harvey P. Dale, Nov 01 2011 *)
|
|
|
CROSSREFS
| Cf. A048482, A001787, A005183.
Sequence in context: A055218 A107307 A005492 * A117202 A137213 A027853
Adjacent sequences: A003010 A003011 A003012 * A003014 A003015 A003016
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com).
|
| |
|
|
