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

6, 7, 17, 42, 56, 62, 106, 108, 112, 141, 161, 163, 173, 210, 212, 231, 296, 306, 342, 360, 382, 395, 400, 416, 418, 431, 435, 457, 458, 492, 517, 530, 531, 540, 551, 618, 637, 672, 697, 713, 722, 732, 790, 791, 810, 850, 852, 876, 898, 902, 926, 928, 937, 938, 970, 1010, 1091, 1118, 1123, 1150, 1157, 1165

Offset

1,1

Links

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

Mathematica

Select[Range[1200], PrimeQ[Cyclotomic[50, #]] &] (* Vincenzo Librandi, Jan 16 2015 *)

Prog

(PARI) {is(n)=isprime(polcyclo(50, n))};
for(n=1, 1000, if(is(n), print1(n, ", "))) \\ G. C. Greubel, May 20 2018

Crossrefs

Cf. A246392.

Sequence in context: A062850 A139450 A219853 * A260563 A118666 A315847

Adjacent sequences: A250193 A250194 A250195 * A250197 A250198 A250199

Keyword

nonn

Author

R. J. Mathar, Jan 12 2015

Status

approved