A131473 a(n) = n^6 - n.

0, 0, 62, 726, 4092, 15620, 46650, 117642, 262136, 531432, 999990, 1771550, 2985972, 4826796, 7529522, 11390610, 16777200, 24137552, 34012206, 47045862, 63999980, 85766100, 113379882, 148035866, 191102952, 244140600, 308915750

Offset

0,3

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..10000

Maple

A131473:=n->n^6-n; seq(A131473(n), n=0..30); # Wesley Ivan Hurt, Feb 25 2014

Mathematica

f[n_]:=n^6-n; f[Range[0, 60]] (* Vladimir Joseph Stephan Orlovsky, Feb 10 2011 *)
Array[#^6-#&, 60, 0] (* Harvey P. Dale, Aug 10 2011 *)

Prog

(Sage) [lucas_number1(3, n^3, n) for n in range(0, 27)] # Zerinvary Lajos, May 16 2009
(Magma) [n^6-n: n in [0..30]]; // Vincenzo Librandi, Aug 11 2011

Crossrefs

Cf. A002378, A007531, A034262, A091940, A058895, A059826.

Sequence in context: A290285 A286212 A196413 * A138408 A234482 A157499

Adjacent sequences: A131470 A131471 A131472 * A131474 A131475 A131476

Keyword

nonn

Author

Mohammad K. Azarian, Jul 27 2007

Status

approved