login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A152041
A008893/2.
2
0, 4, 33, 129, 355, 795, 1554, 2758, 4554, 7110, 10615, 15279, 21333, 29029, 38640, 50460, 64804, 82008, 102429, 126445, 154455, 186879, 224158, 266754, 315150, 369850, 431379, 500283, 577129, 662505, 757020, 861304, 976008, 1101804, 1239385, 1389465
OFFSET
0,2
FORMULA
a(n) = n*(n+1)*(7*n^2+7*n+2)/8.
G.f.: -x*(4*x^2+13*x+4)/(x-1)^5.
a(0)=0, a(1)=4, a(2)=33, a(3)=129, a(4)=355, a(n)=5*a(n-1)- 10*a(n-2)+ 10*a(n-3)-5*a(n-4)+a(n-5) [From Harvey P. Dale, Jul 20 2011]
MATHEMATICA
Table[n(n+1)(7n^2+7n+2)/8, {n, 0, 40}] (* or *) LinearRecurrence[ {5, -10, 10, -5, 1}, {0, 4, 33, 129, 355}, 40] (* Harvey P. Dale, Jul 20 2011 *)
PROG
(Maxima) A152041(n):=n*(n+1)*(7*n^2+7*n+2)/8$
makelist(A152041(n), n, 0, 30); /* Martin Ettl, Nov 03 2012 */
CROSSREFS
Sequence in context: A295939 A297515 A027169 * A041027 A362820 A364946
KEYWORD
nonn,easy
AUTHOR
M. F. Hasler, Sep 15 2009
EXTENSIONS
Extended and edited by Nathaniel Johnston, May 05 2011
STATUS
approved