A368371 - OEIS

%I #13 Jan 29 2024 14:24:42

%S 0,4,1016,547856,813732832,3903659417664,67987041960443776,

%T 4575641535535493153024,1216334976081196096854162944,

%U 1285452910821757852273429343896576,5415346123378152397099190627515485911040,91076602434014222291049466570765323207327092736

%N AGM transform of powers of 2.

%C See A368366 for further information.

%H Paolo Xausa, <a href="/A368371/b368371.txt">Table of n, a(n) for n = 1..55</a>

%t A369394[n_] := (2^(n+1)-2)^n - n^n*2^(n*(n+1)/2);

%t Array[A369394, 15] (* _Paolo Xausa_, Jan 29 2024 *)

%o (Python)

%o def A368371(n): return ((1<<n+1)-2)**n-n**n*(1<<(n*(n+1)>>1)) # _Chai Wah Wu_, Jan 25 2024

%Y Cf. A368366.

%K nonn

%O 1,2

%A _N. J. A. Sloane_, Jan 24 2024