|
|
A027745
|
|
Number of primitive polynomials of degree n over GF(9).
|
|
5
|
|
|
1, 4, 16, 96, 640, 5280, 27648, 340704, 1966080, 15676416, 124608000, 1341648000, 7166361600, 97763702400, 629315721216, 4680529920000, 42316647628800, 483414202656000, 2396062681399296, 35513562609100800, 211942058803200000, 2006922093666287616, 16837843397760000000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
MAPLE
|
with(numtheory): seq(`if`(n=0, 1, phi(9^n-1)/n), n=0..22);
|
|
MATHEMATICA
|
Join[{1}, Array[EulerPhi[9^# - 1]/# &, 25]] (* Paolo Xausa, Jun 17 2024 *)
|
|
PROG
|
(PARI) a(n) = if(n==0, 1, eulerphi(9^n-1)/n) \\ Andrew Howroyd, Feb 01 2024
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|