A152837 - OEIS

A152837

a(0)=-1; a(n)=Floor[n^a(n-1)-a(n-1)^n].

-1, 2, 0, 1, 3, -118, -2699554153024, 1044826807337428519663920677057429215016680080584103502827667086054551857192770337767423

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,2

LINKS

EXAMPLE

a(1) = 1^(-1)-(-1)^1 = 2. - R. J. Mathar, Jan 08 2009

MATHEMATICA

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

CROSSREFS

KEYWORD

sign

AUTHOR

EXTENSIONS

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

STATUS

approved