A028686 Pseudo Galois numbers for d=24.

1, 552, 182822400, 34935377382604800, 3845511050527581426155520000, 243818371522804938361462294653739991040000, 8904331592711942612922766177589119660252055149215744000000, 187309027227336950425268745082789353880120643944720523727102076558245888000000

Offset: 0

Author

Olivier Gérard

Keywords

• nonn

Links

• Vincenzo Librandi, Table of n, a(n) for n = 0..26

Crossrefs

Cf. A028668, A028670, A028671, A028672, A028674, A028676, A028677, A028678, A028680, A028682, A028683, A028684.

Programs

Mathematica

FoldList[ #1*24^#2 (24^#2-1)&, 1, Range[ 20 ] ]
a[n_] := 24^n * Product[24^n - 24^k, {k, 0, n-1}]; Array[a, 8, 0] (* Amiram Eldar, Jul 14 2025 *)

PARI

a(n) = 24^n * prod(k = 0, n-1, 24^n - 24^k); \\ Amiram Eldar, Jul 14 2025

Formula

a(n) = 24^n * Product_{k=0..n-1} (24^n - 24^k).

a(n) ~ c * 24^(n^2+n), where c = Product_{k>=1} (1 - 1/24^k) = 0.956597348026... . - Amiram Eldar, Jul 14 2025