1,2

2n^3 - 3n^2 + 4n - 2.

lst={}; Do[s0=n^3; s1=(n+1)^3; AppendTo[lst, (s1+s0)+n], {n, 0, 5!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Feb 19 2009]

Sequence in context: A139242 A139236 A096000 this_sequence A048480 A116970 A110528

Adjacent sequences: A047669 A047670 A047671 this_sequence A047673 A047674 A047675

nonn

N. J. A. Sloane (njas(AT)research.att.com).