login
A153378
Smaller of two consecutive prime numbers such that p1*p2*d - d = average of twin prime pairs, d (delta) = p2 - p1.
13
1187, 8893, 13967, 31817, 33107, 56009, 57587, 66587, 85837, 87797, 90547, 91199, 93497, 101293, 103177, 111667, 113117, 127447, 141397, 142873, 150343, 150407, 151667, 152617, 156817, 157127, 161977, 176819, 179737, 186007, 205957, 209401
OFFSET
1,1
COMMENTS
See A153379 for the corresponding larger prime.
LINKS
EXAMPLE
1187*1193*6 - 6 = 8496540 and 8496540 +- 1 are primes, so 1187 is a term.
MATHEMATICA
lst={}; Do[p1=Prime[n]; p2=Prime[n+1]; d=p2-p1; a=p1*p2*d-d; If[PrimeQ[a-1]&&PrimeQ[a+1], AppendTo[lst, p1]], {n, 8!}]; lst
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved