A186941 a(n)=2^C(n,2)*(2(4^n-n*2^n)-1).
1, 3, 30, 632, 24512, 1768448, 243236864, 64959283200, 34084592025600, 35395409601888256, 73066365170086838272, 300608105396373834170368, 2468626449866096479911804928, 40500446023029046169942454435840, 1328092178371231300789305464410079232
Offset: 0
Programs
-
Mathematica
Table[2^Binomial[n,2] (2(4^n-n*2^n)-1),{n,0,20}] (* Harvey P. Dale, Aug 04 2019 *)
Formula
a(n)=2^C(n,2)*A186942(n).
Comments