OFFSET
1,2
COMMENTS
See A368366 for further information.
LINKS
Paolo Xausa, Table of n, a(n) for n = 1..55
MATHEMATICA
A369394[n_] := (2^(n+1)-2)^n - n^n*2^(n*(n+1)/2);
Array[A369394, 15] (* Paolo Xausa, Jan 29 2024 *)
PROG
(Python)
def A368371(n): return ((1<<n+1)-2)**n-n**n*(1<<(n*(n+1)>>1)) # Chai Wah Wu, Jan 25 2024
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Jan 24 2024
STATUS
approved