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

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

Offset

0,1

Links

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

Mathematica

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

Crossrefs

Sequence in context: A385449 A080758 A123683 * A010306 A388338 A197700

Adjacent sequences: A143780 A143781 A143782 * A143784 A143785 A143786

Keyword

sign,less

Author

Vladimir Joseph Stephan Orlovsky, Aug 31 2008

Extensions

Edited by Andrey Zabolotskiy, Apr 04 2025

Status

approved