|
| |
| |
|
|
|
0, 3, 18, 73, 256, 844, 2709, 8596, 27146, 85560, 269464, 848400, 2670859, 8407805, 26467163, 83316232, 262271397, 825604226, 2598919135, 8181135469, 25753388928, 81069068693, 255197243733, 803335158081, 2528817970143
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
FORMULA
| a(n)=A124820(n)-A000217(n+1). G.f.: x^2(3-3x+x^2)/((1-x)^3*(1-4x+3x^2-x^3)). [From R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Dec 15 2008]
|
|
|
MATHEMATICA
| lst={}; a=b=c=s=0; Do[c+=n+a; b+=n+c; a+=n+b; s+=a; AppendTo[lst, s], {n, 0, 2*4!}]; lst
Rest[CoefficientList[Series[x^2(3-3x+x^2)/((1-x)^3(1-4x+3x^2-x^3)), {x, 0, 40}], x]] (* From Harvey P. Dale, Mar 11 2011 *)
|
|
|
CROSSREFS
| Cf. A152891, A152895, A152896
Sequence in context: A114633 A135070 A073961 * A059393 A094033 A043008
Adjacent sequences: A152894 A152895 A152896 * A152898 A152899 A152900
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Vladimir Orlovsky (4vladimir(AT)gmail.com), Dec 14 2008
|
| |
|
|
