Voozh

A250179

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

2, 3, 5, 6, 10, 13, 14, 15, 18, 25, 26, 27, 31, 34, 37, 39, 40, 42, 44, 46, 49, 50, 53, 59, 62, 63, 65, 68, 69, 75, 76, 77, 83, 87, 99, 100, 102, 104, 107, 110, 142, 152, 161, 166, 174, 175, 184, 187, 188, 191, 192, 199, 204, 207, 208, 213, 215, 222, 224, 227, 238, 244, 245, 247, 250, 256, 259, 263, 264, 265, 268, 274, 279, 286, 289, 303, 310, 311, 312, 314, 327, 332, 337, 339, 350, 353, 363, 366

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

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

MATHEMATICA

a250179[n_] := Select[Range[n], PrimeQ@Cyclotomic[24, #] &]; a250179[366] (* Michael De Vlieger, Dec 25 2014 *)

PROG

(PARI) {is(n)=isprime(polcyclo(24, n))};

for(n=1, 1000, if(is(n), print1(n, ", "))) \\ G. C. Greubel, May 20 2018

CROSSREFS

See A250177 for references.