A153378 Smaller of two consecutive prime numbers such that p1*p2*d - d = average of twin prime pairs, d (delta) = p2 - p1.
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
Keywords
Examples
1187*1193*6 - 6 = 8496540 and 8496540 +- 1 are primes, so 1187 is a term.
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
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
Comments