A143780 Numbers of the form : k=k^n-n^k, (k=0).

-1, 0, -1, 6, -26444, 341989937615742945541647800

Offset

1,4

Links

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

Mathematica

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

Crossrefs

Sequence in context: A241650 A368064 A337990 * A225716 A159429 A367944

Adjacent sequences: A143777 A143778 A143779 * A143781 A143782 A143783

Keyword

sign

Author

Vladimir Joseph Stephan Orlovsky, Aug 31 2008

Status

approved