A153217 a(n)=n^(n+3)-(n+3)^n.

-1, -3, 7, 513, 13983, 357857, 9546255, 272475249, 8375575711, 277269756129, 9862141508151, 375700268413577, 15277275236695743, 660913009555809345, 30322968902771794975, 1471145239418922932193, 75269422312346702251455

Offset

0,2

Links

Table of n, a(n) for n=0..16.

Mathematica

a[n_]:=n^(n+3)-(n+3)^n; lst={}; Do[AppendTo[lst, a[n]], {n, 0, 4!}]; lst
Table[n^(n+3)-(n+3)^n, {n, 0, 20}] (* Harvey P. Dale, Jan 27 2014 *)

Crossrefs

Cf. A046065

Sequence in context: A013424 A013423 A199365 * A120905 A062599 A101246

Adjacent sequences: A153214 A153215 A153216 * A153218 A153219 A153220

Keyword

sign

Author

Vladimir Joseph Stephan Orlovsky, Dec 20 2008

Extensions

Minor edits from Harry J. Smith, Dec 23 2008

Status

approved