OFFSET
1,1
COMMENTS
Primes congruent to 12332 mod 123321. - Robert Israel, Dec 24 2014
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MAPLE
select(isprime, [seq(12332+123321*(2*j+1), j=0..1000)]); # Robert Israel, Dec 24 2014
MATHEMATICA
nn=40*10^6; Intersection[Select[Range[111, nn, 1111], PrimeQ], Select[ Range[ 11, nn, 111], PrimeQ]] (* or *) Select[Range[12332, 33*10^6, 123321], PrimeQ]
Select[Prime[Range[2*10^6]], Mod[#, 111]==11&&Mod[#, 1111]==111&] (* or *) Select[12332+(123321*Range[1, 300, 2]), PrimeQ] (* Harvey P. Dale, Jan 18 2019 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Harvey P. Dale, Dec 24 2014
STATUS
approved