OFFSET
1,3
COMMENTS
Also number of primitive polynomials of degree n over GF(13) whose second-highest coefficient is 0.
FORMULA
a(n) = A192216(n) / n.
PROG
(GAP)
p := 13;
a := function(n)
local q, k, cnt, x;
q:=p^n; k:=GF(p, n); cnt:=0;
for x in k do
if Trace(k, GF(p), x)=0*Z(p) and Order(x)=q-1 then
cnt := cnt+1;
fi;
od;
return cnt/n;
end;
for n in [1..16] do Print (a(n), ", "); od;
(Sage) # See A192507 (change first line p=3 to p=13)
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
Joerg Arndt, Jul 03 2011
EXTENSIONS
a(7)-a(9) from Robin Visser, Jun 01 2024
STATUS
approved