|
|
A250186
|
|
Numbers n such that Phi(35,n) is prime, where Phi is the cyclotomic polynomial.
|
|
2
|
|
|
14, 33, 39, 55, 112, 130, 132, 138, 168, 176, 179, 186, 189, 195, 210, 246, 259, 264, 310, 318, 346, 417, 431, 467, 478, 480, 534, 545, 564, 567, 661, 671, 741, 744, 749, 757, 786, 794, 804, 825, 851, 866, 911, 948, 955, 962, 976, 992, 1014, 1033, 1042, 1082, 1109, 1161, 1193, 1220, 1244, 1260, 1268, 1278, 1313, 1414, 1437
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[1500], PrimeQ[Cyclotomic[35, #]] &] (* Vincenzo Librandi, Jan 16 2015 *)
|
|
PROG
|
(PARI) {is(n)=isprime(polcyclo(35, n))};
for(n=1, 1000, if(is(n), print1(n, ", "))) \\ G. C. Greubel, May 20 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|