A152838 a(n) = floor(b(n)), where b(0) = 1 and b(n) = b(n-1)^n-n^b(n-1).

1, 0, -1, -2, 3, 118, -199068134034785153195409370979964879499768447341765846329146257207125965412281784631240438088

Offset

0,4

Links

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

Example

From Jason Yuen, Oct 08 2025: (Start)
b(0) = 1; a(0) = 1.
b(1) = 1^1-1^1 = 0; a(1) = 0.
b(2) = 0^2-2^0 = -1; a(2) = -1.
b(3) = (-1)^3-3^(-1) = -4/3; a(3) = floor(-4/3) = -2.
b(4) = (-4/3)^4-4^(-4/3) = 3.0030036...; a(4) = floor(3.0030036...) = 3. (End)

Mathematica

lst={}; a=1; Do[a=a^n-n^a; AppendTo[lst, Floor[a]], {n, 0, 6}]; lst

Crossrefs

Cf. A084964, A152832, A152833, A152835, A152836, A152837

Sequence in context: A371146 A127819 A378866 * A208247 A102697 A041813

Adjacent sequences: A152835 A152836 A152837 * A152839 A152840 A152841

Keyword

sign

Author

Vladimir Joseph Stephan Orlovsky, Dec 14 2008

Extensions

Indices added to definition, offset corrected by R. J. Mathar, Jan 08 2009

Definition corrected by Jason Yuen, Oct 08 2025

Status

approved