|
|
A138625
|
|
Primes congruent to 12 mod 17.
|
|
4
|
|
|
29, 97, 131, 199, 233, 607, 641, 709, 743, 811, 947, 1049, 1117, 1151, 1321, 1423, 1559, 1627, 1831, 1933, 2069, 2137, 2239, 2273, 2341, 2477, 2579, 2647, 2749, 2851, 2953, 3089, 3191, 3259, 3361, 3463, 3701, 3769, 3803, 4007, 4177, 4211, 4483, 4517, 4721
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
17*2-5=29, 17*6-5=97, 17*8-5=131, 17*12-5=199,...
|
|
MATHEMATICA
|
a={}; Do[x=17*n-5; If[PrimeQ[x], AppendTo[a, x]], {n, 10^2}]; a
Select[Prime[Range[700]], MemberQ[{12}, Mod[#, 17]]&] (* Vincenzo Librandi, Aug 15 2012 *)
|
|
PROG
|
(Magma) [p: p in PrimesUpTo(6000) | p mod 17 eq 12 ]; // Vincenzo Librandi, Aug 15 2012
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|