A028668 Pseudo Galois numbers for d=6.

1, 30, 37800, 1755432000, 2946176634240000, 178121125423535616000000, 387722609071165087097978880000000, 30383449623465746081582327522446540800000000, 85714999722921366207156144059911618537426255872000000000, 8705210793883473550569112250184122162504600827770940780707840000000000

Offset: 0

Author

Olivier Gérard

Keywords

• nonn

Links

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

Crossrefs

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

Cf. A132034.

Programs

Mathematica

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

PARI

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

Formula

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

a(n) ~ c * 6^(n^2+n), where c = A132034. - Amiram Eldar, Jul 13 2025