|
| |
|
|
A157995
|
|
Primes which are sum of 1 plus two consecutive not-twin primes, p1 and p2, (p2-p1)>2.
|
|
2
| |
|
|
19, 31, 43, 53, 79, 101, 113, 139, 163, 173, 199, 211, 223, 241, 269, 331, 353, 373, 463, 509, 521, 577, 601, 619, 631, 727, 773, 787, 811, 829, 853, 883, 907, 919, 947, 967, 991, 1013, 1031, 1181, 1193, 1231, 1291, 1301, 1361, 1429, 1447, 1483, 1531, 1543
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| 19=7+11+1, 31=13+17+1, 43=19+23+1, 53=23+29+1, 79=37+41+1, 101=47+53+1, ...
|
|
|
MATHEMATICA
| lst={}; Do[p0=Prime[n]; p1=Prime[n+1]; a=p0+p1+1; If[PrimeQ[a]&&(p1-p0)>2, AppendTo[lst, a]], {n, 6!}]; lst
Select[Total[#]+1&/@Select[Partition[Prime[Range[200]], 2, 1], Last[#]-First[#]>2&], PrimeQ] (* From Harvey P. Dale, Mar 13 2011 *)
|
|
|
CROSSREFS
| Cf. A005385, A092738, A118071
Sequence in context: A154418 A120337 A120115 * A043298 A040068 A096787
Adjacent sequences: A157992 A157993 A157994 * A157996 A157997 A157998
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Vladimir Orlovsky (4vladimir(AT)gmail.com), Mar 11 2009
|
|
|
EXTENSIONS
| Definition corrected by Harvey P. Dale, Mar 13 2011.
|
| |
|
|
