A250180 Numbers n such that Phi_25(n) is prime, where Phi is the cyclotomic polynomial.

1, 22, 33, 39, 43, 62, 74, 134, 142, 167, 212, 238, 287, 313, 335, 369, 414, 415, 418, 432, 509, 604, 679, 697, 770, 782, 815, 859, 874, 895, 897, 924, 1039, 1048, 1070, 1085, 1134, 1145, 1170, 1177, 1212, 1239, 1240, 1262, 1339, 1347, 1364, 1374, 1407, 1413, 1414, 1449

Offset: 1

Author

Eric Chen, Dec 26 2014

Keywords

• nonn

Links

• G. C. Greubel, Table of n, a(n) for n = 1..10000

Crossrefs

See A250177 for references.

Programs

Mathematica

a250180[n_] := Select[Range[n], PrimeQ@Cyclotomic[25, #] &]; a250180[256]

PARI

isok(n) = isprime(polcyclo(25, n)); \\ Michel Marcus, Dec 27 2014