A088817 Numbers k such that Cyclotomic(2k,k) is prime.
1, 2, 3, 4, 5, 9, 17, 36, 157, 245, 352, 3977
Offset: 1
Links
- Eric Weisstein's World of Mathematics, Cyclotomic Polynomial
- Wikipedia, Aurifeuillean factorization
Crossrefs
Programs
-
Mathematica
Do[p=Prime[n]; If[PrimeQ[Cyclotomic[2n, n]], Print[p]], {n, 100}]
-
PARI
is(n)=ispseudoprime(polcyclo(2*n,n)) \\ Charles R Greathouse IV, May 22 2017
Comments