A260517 Numbers equidistant from twin prime pairs that are also equidistant from numbers equidistant from twin prime pairs.

51, 105, 144, 165, 234, 255, 276, 630, 1041, 2289, 2325, 2466, 4251, 5460, 9006, 9699, 10380, 10479, 12006, 13701, 14166, 15690, 18090, 19425, 20190, 20295, 21540, 26706, 26796, 32487, 32871, 33684, 33789, 35520, 37455, 38661, 41685, 42771, 46515, 47760

Offset

1,1

Links

Robert G. Wilson v, Table of n, a(n) for n = 1..1257

Example

165 is a term because it is equidistant from 144 and 186. 144 and 186 are both equidistant from twin primes, according to A074953.

Mathematica

t = Select[ Prime@ Range@ 5000, PrimeQ[# + 2] &]; d = Differences@ t; (t[[#+1]] + t[[#+2]]& /@ Select[ Range[ Length[d] - 2], d[[#]] == d[[#+2]] &])/2 + 1 (* Robert G. Wilson v, Jul 29 2015 *)

Crossrefs

Cf. A001097 (Twin primes), A074953 (Numbers equidistant from twin prime pairs).

Sequence in context: A044140 A044521 A160847 * A235878 A015705 A359088

Adjacent sequences: A260514 A260515 A260516 * A260518 A260519 A260520

Keyword

nonn

Author

Peter Woodward, Jul 27 2015

Status

approved