A143783 Numbers of the form : k=k^n-n^k, (k=4).

3, 1, -2, 15, -137984787083, 6902195348070069511711186593994436908244064708018164500799150599256

Offset

1,1

Links

Table of n, a(n) for n=1..6.

Mathematica

lst={}; k=4; Do[k=k^n-n^k; AppendTo[lst, IntegerPart[k]], {n, 6}]; lst

Crossrefs

Sequence in context: A126038 A088363 A300839 * A179175 A274635 A146524

Adjacent sequences: A143780 A143781 A143782 * A143784 A143785 A143786

Keyword

sign

Author

Vladimir Joseph Stephan Orlovsky, Aug 31 2008

Status

approved