A143784 Numbers of the form : k=k^n-n^k, (k=5).

4, 0, -1, 0, -3, 898

Offset

1,1

Links

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

Mathematica

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

Crossrefs

Sequence in context: A275714 A111728 A359010 * A272774 A333274 A147311

Adjacent sequences: A143781 A143782 A143783 * A143785 A143786 A143787

Keyword

sign

Author

Vladimir Joseph Stephan Orlovsky, Aug 31 2008

Status

approved