|
|
A164566
|
|
Primes p such that 7*p-6 and 7*p+6 are also prime numbers.
|
|
4
|
|
|
5, 11, 19, 31, 41, 61, 71, 109, 151, 211, 229, 269, 379, 419, 431, 439, 479, 619, 641, 709, 739, 809, 839, 971, 1009, 1069, 1229, 1259, 1319, 1361, 1439, 1451, 1499, 1531, 1579, 1669, 1801, 1879, 1889, 2011, 2111, 2239, 2269, 2381, 2411, 2551, 2579, 2591
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Primes of the form A087681(k)/7, any index k.
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
For p=5, both 7*5-6=29 and 7*5+6=41 are prime,
for p=11, both 7*11-6=71 and 7*11+6=83 are prime.
|
|
MATHEMATICA
|
lst={}; Do[p=Prime[n]; If[PrimeQ[7*p-6]&&PrimeQ[7*p+6], AppendTo[lst, p]], {n, 6!}]; lst
Select[Prime[Range[700]], And @@ PrimeQ/@{7 # + 6, 7 # - 6}&] (* Vincenzo Librandi, Apr 09 2013 *)
|
|
PROG
|
(Magma) [p: p in PrimesUpTo(3000) | IsPrime(7*p-6) and IsPrime(7*p+6)]; // Vincenzo Librandi, Apr 09 2013
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|