|
|
A154550
|
|
Greater of two consecutive primes, p < q, such that p*q+p-q is prime.
|
|
3
|
|
|
3, 5, 11, 23, 29, 47, 59, 83, 131, 223, 233, 239, 347, 401, 449, 467, 479, 503, 509, 607, 641, 673, 971, 997, 1013, 1151, 1163, 1217, 1249, 1283, 1301, 1399, 1409, 1427, 1451, 1459, 1481, 1523, 1601, 1627, 1709, 1733, 1787, 1847, 1889, 1997, 2039, 2309, 2441
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
3*5-2=13, 7*11-4=73, 19*23-4=433, ...
|
|
LINKS
|
Table of n, a(n) for n=1..49.
|
|
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
Sequence in context: A015915 A275785 A106901 * A023202 A049436 A117010
Adjacent sequences: A154547 A154548 A154549 * A154551 A154552 A154553
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Vladimir Joseph Stephan Orlovsky, Jan 11 2009
|
|
EXTENSIONS
|
Edited by Omar E. Pol, Jan 12 2009
|
|
STATUS
|
approved
|
|
|
|