OFFSET
1,1
LINKS
MATHEMATICA
Select[Table[Cyclotomic[k, -10], {k, 3, 100}], PrimeQ[#] &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert Price, Sep 07 2017
STATUS
approved