|
| |
|
|
A154551
|
|
Greater of two consecutive primes, p < q, such that p*q-p+q is prime.
|
|
2
| |
|
|
3, 5, 7, 29, 37, 67, 89, 97, 151, 181, 241, 257, 269, 271, 359, 373, 421, 439, 457, 509, 563, 571, 577, 593, 659, 709, 739, 769, 853, 947, 991, 997, 1117, 1129, 1193, 1201, 1291, 1297, 1321, 1399, 1423, 1471, 1499, 1511, 1579, 1627, 1657, 1721, 1753, 1907
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| 3*5+2=17, 7*5+2=37, 23*29+6=673,...
|
|
|
MATHEMATICA
| lst={}; Do[pp=Prime[n-1]; p=Prime[n]; d=p-pp; If[PrimeQ[pp*p+d], AppendTo[lst, p]], {n, 2, 7!}]; lst
|
|
|
CROSSREFS
| Cf. A138111, A138170, A154550
Sequence in context: A093574 A076846 A046931 * A058047 A098860 A106920
Adjacent sequences: A154548 A154549 A154550 * A154552 A154553 A154554
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Vladimir Orlovsky (4vladimir(AT)gmail.com), Jan 11 2009
|
|
|
EXTENSIONS
| Edited by Omar E. Pol, Jan 12 2009
|
| |
|
|
