|
Search: id:A137714
|
|
|
| A137714 |
|
Prime numbers p such that p +- ((p-1)/5) are primes. |
|
+0
2
|
|
| 1291, 5701, 6961, 7351, 7591, 8101, 8191, 10651, 10861, 12211, 12511, 15361, 15901, 16111
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
1291+-(1290/5)=primes
5701+-(5700/5)=primes
|
|
MATHEMATICA
|
w=5; s=""; For[i=1, i<10^3*2, p=Prime[i]; If[PrimeQ[p-((p-1)/w)]&&PrimeQ[p+((p-1)/w)], (*Print[p, ":", p-((p-1)/w), ", ", p+((p-1)/w)]; *)s=s<>ToString[p]<>", "]; i++ ]; Print[s]
|
|
CROSSREFS
|
Sequence in context: A140914 A020401 A106816 this_sequence A139027 A043392 A043372
Adjacent sequences: A137711 A137712 A137713 this_sequence A137715 A137716 A137717
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Vladimir Orlovsky (4vladimir(AT)gmail.com), Apr 27 2008
|
|
|
Search completed in 0.002 seconds
|
