A363402 - OEIS

%I #5 Jun 08 2023 08:50:19

%S 0,2,12,56,480,992,4032,16256,261120,784896,1047552,4192256,33546240,

%T 67100672,268419072,1073709056,34359214080,17179738112,206157643776,

%U 274877382656,2199021158400,4398044413952,17592181850112,70368735789056,1125899839733760,5629499366440960

%N a(n) = n * (4^n - 2^n) / Clausen(n, 0).

%F a(n) = n * A020522(n) / A160014(n, 0).

%p # Using function 'Clausen' from A160014.

%p a := n -> n * (4^n - 2^n) / Clausen(n, 0):

%p seq(a(n), n = 0..25);

%Y Cf. A160014, A363403, A363395.

%K nonn

%O 0,2

%A _Peter Luschny_, Jun 08 2023