OFFSET
1,1
COMMENTS
No other terms below 300. - Max Alekseyev, May 29 2009
No other terms below 760. - Lucas A. Brown, Dec 16 2020
EXAMPLE
4 is a term because cyclotomic(4,16) = 1 + 16^2 = 257 is prime.
MATHEMATICA
Do[s=Cyclotomic[n, 2^n]; If[PrimeQ[s], Print[n]], {n, 1, 1000}]
Select[Range[150], PrimeQ[Cyclotomic[#, 2^#]]&] (* Harvey P. Dale, Aug 12 2023 *)
PROG
(PARI) isok(k) = isprime(polcyclo(k, 2^k)); \\ Michel Marcus, Dec 17 2020
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Labos Elemer, May 02 2002
EXTENSIONS
One more term from Max Alekseyev, May 29 2009
STATUS
approved