A145385 a(1) = 1; a(n) = a(n-1) + n^a(n-1) for n > 1.

1, 3, 30, 1152921504606847006

Offset

1,2

Comments

Next term is too large to include.

Links

Table of n, a(n) for n=1..4.

Mathematica

lst={}; s=0; Do[s+=n^s; AppendTo[lst, s], {n, 4}]; lst

Prog

(ARIBAS) a:=0; for n:=1 to 4 do a:=a+n**a; write(a:group(0), ", "); end; end;

Crossrefs

Sequence in context: A308383 A065594 A155731 * A059232 A068698 A053300

Adjacent sequences: A145382 A145383 A145384 * A145386 A145387 A145388

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Oct 10 2008

Extensions

Edited definition, added comment and ARIBAS code. - Klaus Brockhaus, Oct 13 2008

Status

approved