A027744 Number of primitive polynomials of degree n over GF(8).

1, 6, 18, 144, 432, 5400, 23328, 254016, 829440, 12607488, 53460000, 633048768, 2176782336, 35784141120, 173408594688, 1903214880000, 6849130659840, 112370402481120, 534356527841280, 6501218491422144, 20323353600000000, 367285791437881344, 1782862092373874688

Offset: 0

Author

N. J. A. Sloane

Keywords

• nonn

Links

• Andrew Howroyd, Table of n, a(n) for n = 0..100

Crossrefs

Column k=8 of A369291.

Programs

Maple

with(numtheory): seq(`if`(n=0, 1, phi(8^n-1)/n), n=0..22);

Mathematica

Join[{1}, Array[EulerPhi[8^# - 1]/# &, 25]] (* Paolo Xausa, Jun 17 2024 *)

PARI

a(n) = if(n==0, 1, eulerphi(8^n-1)/n) \\ Andrew Howroyd, Feb 01 2024

Extensions

a(20) onwards from Andrew Howroyd, Feb 01 2024