A250178 Numbers k such that Phi_22(k) is prime, where Phi is the cyclotomic polynomial.
2, 6, 12, 13, 23, 24, 26, 35, 62, 69, 91, 105, 147, 160, 163, 183, 185, 193, 229, 232, 233, 236, 248, 262, 269, 280, 294, 303, 315, 330, 376, 394, 426, 430, 440, 464, 469, 491, 492, 508, 537, 625, 629, 647, 653, 666, 752, 772, 775, 786, 788, 832, 840, 852, 854, 855, 859, 905, 922, 972, 993, 998
Offset: 1
Keywords
Links
- G. C. Greubel, Table of n, a(n) for n = 1..10000
Crossrefs
See A250177 for references.
Programs
-
Magma
[n: n in [1..1000]| IsPrime((n^11+1) div (n+1))]; // Vincenzo Librandi, May 21 2018
-
Mathematica
a250178[n_] := Select[Range[n], PrimeQ@Cyclotomic[22, #] &]; a250178[1000] (* Michael De Vlieger, Dec 25 2014 *)
-
PARI
isok(n) = isprime(polcyclo(22, n)); \\ Michel Marcus, Sep 29 2015
Comments