A144547 A bisection of A028666.
1, 2880, 758041804800, 13319336815141167562752000, 15354978274323252140217954794120612413440000, 1160183823755957350394353874696058298158177597536388268425216000000, 5744950321305805807513301436668994962443746225944514592041927656983526026246267317780480000000, 1864342934383580231084517260259192252139946430124547822192277172067265954040486594733297802503864086641393952539593932800000000
Offset: 0
Keywords
Programs
-
Mathematica
a[n_] := 16^n * Product[16^n - 4^k, {k, 0, 2*n-1}]; Array[a, 8, 0] (* Amiram Eldar, Jul 14 2025 *)
-
PARI
a(n) = 16^n * prod(k = 0, 2*n-1, 16^n - 4^k); \\ Amiram Eldar, Jul 14 2025
Formula
From Amiram Eldar, Jul 14 2025: (Start)
a(n) = A028666(2*n).
a(n) ~ c * 16^(2*n^2+n), where c = A100221. (End)