login
A152836
a(0)=-1; a(n)=n^a(n-1)-a(n-1)^n.
5
-1, 2, 0, 1, 3, -118
OFFSET
0,2
COMMENTS
Sequence is finite because followup terms are fractions. - R. J. Mathar, Jun 19 2021
MATHEMATICA
lst={}; a=1; Do[a=n^a-a^n; AppendTo[lst, a], {n, 0, 5}]; lst
nxt[{n_, a_}]:={n+1, (n+1)^a-a^(n+1)}; NestList[nxt, {0, -1}, 5][[All, 2]] (* Harvey P. Dale, Jun 06 2022 *)
CROSSREFS
KEYWORD
sign,fini,less
AUTHOR
EXTENSIONS
Definition corrected by N. J. A. Sloane, Jan 11 2009
Offset corrected. R. J. Mathar, Jun 19 2021
STATUS
approved