A143784 b(n) rounded towards zero, where b(0) = 5 and b(n) = b(n-1)^n - n^b(n-1) for n > 0.

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

Offset

0,1

Links

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

Mathematica

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

Crossrefs

Sequence in context: A274649 A343958 A258234 * A336075 A159799 A185579

Adjacent sequences: A143781 A143782 A143783 * A143785 A143786 A143787

Keyword

sign,less

Author

Vladimir Joseph Stephan Orlovsky, Aug 31 2008

Extensions

Edited by Andrey Zabolotskiy, Apr 04 2025

Status

approved