A171451 a(n) = 2^C(n, 2) * 2^floor(n/3).
1, 1, 2, 16, 128, 2048, 131072, 8388608, 1073741824, 549755813888, 281474976710656, 288230376151711744, 1180591620717411303424, 4835703278458516698824704, 39614081257132168796771975168, 1298074214633706907132624082305024, 42535295865117307932921825928971026432
Offset: 0
Programs
-
Mathematica
Table[2^Binomial[n,2] 2^Floor[n/3],{n,0,20}] (* Harvey P. Dale, Nov 20 2021 *)
-
PARI
a(n) = 2^(n*(3*n-1)\6); \\ Jinyuan Wang, Feb 25 2020
Formula
a(n) = 2^A171452(n).
Extensions
More terms from Jinyuan Wang, Feb 25 2020
Comments