|
|
A138623
|
|
Primes congruent to 5 mod 17.
|
|
4
|
|
|
5, 73, 107, 277, 311, 379, 617, 719, 787, 821, 991, 1093, 1229, 1297, 1399, 1433, 1637, 2011, 2113, 2351, 2521, 2657, 2861, 2963, 3167, 3371, 3541, 3643, 3677, 3779, 3847, 3881, 4051, 4153, 4289, 4357, 4391, 4493, 4561, 4663, 4799, 4969, 5003, 5309, 5479
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
17*0+5=5, 17*4+5=73, 17*6+5=107, 17*16+5=277,...
|
|
MATHEMATICA
|
a={}; Do[x=17*n+5; If[PrimeQ[x], AppendTo[a, x]], {n, 10^2}]; a
Select[Prime[Range[800]], MemberQ[{5}, Mod[#, 17]] &] (* Vincenzo Librandi, Aug 15 2012 *)
|
|
PROG
|
(Magma) [p: p in PrimesUpTo(6000) | p mod 17 eq 5 ]; // Vincenzo Librandi, Aug 15 2012
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|