|
Search: id:A154551
|
|
|
| A154551 |
|
Greater of two consecutive primes, p < q, such that p*q-p+q is prime. |
|
+0
3
|
|
| 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; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
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 this_sequence A058047 A098860 A106920
Adjacent sequences: A154548 A154549 A154550 this_sequence A154552 A154553 A154554
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Vladimir Orlovsky (4vladimir(AT)gmail.com), Jan 11 2009
|
|
EXTENSIONS
|
Edited by Omar E. Pol, Jan 12 2009
|
|
|
Search completed in 0.002 seconds
|
