login
A027744
Number of primitive polynomials of degree n over GF(8).
6
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,2
LINKS
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 *)
PROG
(PARI) a(n) = if(n==0, 1, eulerphi(8^n-1)/n) \\ Andrew Howroyd, Feb 01 2024
CROSSREFS
Column k=8 of A369291.
Sequence in context: A091054 A012774 A306656 * A196868 A077531 A214537
KEYWORD
nonn
EXTENSIONS
a(20) onwards from Andrew Howroyd, Feb 01 2024
STATUS
approved