A162898 - OEIS

%I #9 Sep 05 2019 10:00:40

%S 4,8,9,16,64,81,256,1024,3125,15625,46656,279936,823543,5764801,

%T 16777216,134217728,387420489,3486784401,10000000000,100000000000,

%U 285311670611,3138428376721,8916100448256,106993205379072,302875106592253,3937376385699289,11112006825558016,155568095557812224

%N a(n) = A162897(n)^A162897(n+1).

%C a(n+1) > a(n), for all n.

%o (PARI) getnew(va, n) = {my(x = 2, y = va[n-2]^va[n-1]); while (va[n-1]^x <= y, x++); x;}

%o lista(nn) = {my(va = vector(nn)); va[1] = 2; va[2] = 2; for (n=3, nn, va[n] = getnew(va, n);); vector(nn-1, k, va[k]^va[k+1]);} \\ _Michel Marcus_, Sep 05 2019

%Y Cf. A162897.

%K nonn

%O 1,1

%A _Leroy Quet_, Jul 16 2009

%E More terms from _Michel Marcus_, Sep 05 2019