|
Search: id:A137703
|
|
|
| A137703 |
|
Prime numbers p such that p +- ((p-1)/3) are primes. |
|
+0
1
|
|
| 991, 2143, 3331, 4591, 4663, 5563, 5653, 8623, 9181, 9343, 9631, 12781, 13033
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
991+-(990/3)=primes
2143+-(2142/3)=primes
|
|
MATHEMATICA
|
w=3; 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: A119057 A053393 A031790 this_sequence A093177 A109149 A030645
Adjacent sequences: A137700 A137701 A137702 this_sequence A137704 A137705 A137706
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Vladimir Orlovsky (4vladimir(AT)gmail.com), Apr 27 2008
|
|
|
Search completed in 0.002 seconds
|
