|
|
A145385
|
|
a(1) = 1; a(n) = a(n-1) + n^a(n-1) for n > 1.
|
|
0
|
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Next term is too large to include.
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Edited definition, added comment and ARIBAS code. - Klaus Brockhaus, Oct 13 2008
|
|
STATUS
|
approved
|
|
|
|