OFFSET
1,1
COMMENTS
Can there be an odd multiple of 5 in this sequence?
LINKS
MATHEMATICA
Select[Range[1000], PrimeQ[Cyclotomic[#, 5]] &]
PROG
(PARI) for( i=1, 999, ispseudoprime( polcyclo(i, 5)) && print1( i", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
M. F. Hasler, Apr 03 2008
EXTENSIONS
a(48)-a(54) from Robert Price, Apr 14 2012
STATUS
approved