A329111 - OEIS

%I #61 Jun 23 2022 20:23:52

%S 2,3,4,7,14,24,37,54,73,95,119,145,172,201,232,264,297,332,368,405,

%T 442,481,521,562,604,647,690,735,780,826,872,919,967,1016,1065,1115,

%U 1166,1217,1268,1321,1373,1427,1481,1535,1590,1645,1701,1758

%N a(n) = round(b(n)) where b(n) = b(n-1)^(b(n-1)^(1/b(n-1))) and b(1)=2.

%e a(1) = 2 because round(b(1)) = 2;

%e a(2) = 3 because round(2^(2^(1/2))) = 3;

%e a(3) = 4 because round(b(2)^(b(2)^(1/b(2)))) = 4.

%t Round@ NestList[#^Power[#, 1/#] &, 2, 12] (* _Michael De Vlieger_, Nov 18 2019 *)

%o (JavaScript)

%o var x = 2;

%o var g = [];

%o for (var i = 0; i < 400; i++) {

%o   x=Math.pow(x,Math.pow(x,1/x));

%o   appendItem(g,Math.round(x));

%o }

%o console.log(g);

%Y Cf. A000196.

%K nonn

%O 1,1

%A _Sebastian F. Orellana_, Nov 05 2019