login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

a(1) = 1, for n >= 2: a(n) = (a(n-1)+1)^(n-1) + 1.
0

%I #7 Jan 18 2013 17:22:40

%S 1,3,17,5833,1158419072229137,

%T 2086068166214649286321811524278555292919121929640327670690020838966185723169

%N a(1) = 1, for n >= 2: a(n) = (a(n-1)+1)^(n-1) + 1.

%C The next term -- a(7) -- has 452 digits. - _Harvey P. Dale_, Jan 18 2013

%e For n = 4: a(4) = (17+1)^3 + 1 = 5833.

%t nxt[{n_,a_}]:={n+1,(a+1)^n+1}; Transpose[NestList[nxt,{1,1},5]][[2]] (* _Harvey P. Dale_, Jan 18 2013 *)

%K nonn

%O 1,2

%A _Jaroslav Krizek_, Nov 03 2010