A143781 Numbers of the form : k=k^n-n^k, (k=1).

0, -1, -1, 3, 118, -199068134034785153195409370979964879499768447341765846329146257207125965412281784631240438087

Offset

1,4

Comments

The next number is too large to include.

Links

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

Mathematica

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

Crossrefs

Sequence in context: A173053 A180393 A172013 * A114077 A176996 A159522

Adjacent sequences: A143778 A143779 A143780 * A143782 A143783 A143784

Keyword

sign

Author

Vladimir Joseph Stephan Orlovsky, Aug 31 2008

Status

approved