|
|
A250191
|
|
Numbers n such that Phi(44,n) is prime, where Phi is the cyclotomic polynomial.
|
|
2
|
|
|
25, 60, 70, 77, 86, 116, 117, 119, 137, 151, 166, 175, 176, 177, 181, 184, 202, 208, 229, 241, 300, 313, 328, 332, 344, 385, 402, 442, 444, 446, 453, 467, 470, 500, 501, 522, 527, 531, 532, 534, 568, 584, 592, 629, 690, 696, 701, 706, 709, 728, 734, 749, 795, 812, 828, 838, 844, 845, 855, 857, 950, 951, 965, 991, 1009
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[1100], PrimeQ[Cyclotomic[44, #]] &] (* Vincenzo Librandi, Jan 16 2015 *)
|
|
PROG
|
(PARI) {is(n)=isprime(polcyclo(44, n))};
for(n=1, 1000, if(is(n)==1, print1(n, ", "))) \\ G. C. Greubel, May 18 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|