login
a(n) = floor((Pi^Pi)^Pi)^...^Pi).
0

%I #40 Jul 20 2024 19:56:03

%S 1,3,36,80662,2598761979625197,

%T 2672496879634073073044276636697073994497970453122

%N a(n) = floor((Pi^Pi)^Pi)^...^Pi).

%C a(6) has more than 140 decimal digits and is too big to display. - _L. Edson Jeffery_, Jan 28 2013

%F a(n) = floor((Pi^Pi)^Pi)^...^Pi) (Pi appears n times).

%F a(n) = floor(Pi^(Pi^(n-1))). - _Charles R Greathouse IV_, Jan 28 2013

%e Pi^Pi = 36.4621596072079, so a(2) = 36.

%p a:= n-> floor(Pi^(Pi^(n-1))):

%p seq(a(n), n=0..5); # _Alois P. Heinz_, Jul 20 2024

%t Floor[NestList[#^Pi &, Pi, 5]] (* _Alonso del Arte_, Jan 28 2013 *)

%o (PARI) a(n)=Pi^Pi^n--\1 \\ _Charles R Greathouse IV_, Jan 28 2013

%Y Cf. A000796, A073236, A096232.

%K nonn

%O 0,2

%A _Jon Perry_, Jan 25 2013

%E a(4) corrected by _L. Edson Jeffery_ and _Alonso del Arte_, Jan 28 2013

%E a(5) added by _L. Edson Jeffery_, Jan 28 2013

%E a(0)=1 prepended by _Alois P. Heinz_, Jul 20 2024