A089526 Numbers n such that 2*p(n)+3 and 2*p(n+1)+3 are consecutive primes, where p(i) denotes the i-th prime.

3, 7, 14, 33, 44, 45, 48, 49, 70, 75, 90, 174, 186, 213, 225, 246, 253, 254, 447, 505, 524, 531, 589, 592, 625, 665, 745, 766, 806, 866, 868, 989, 1047, 1084, 1091, 1105, 1131, 1191, 1202, 1228, 1257, 1280, 1333, 1395, 1410, 1429, 1495, 1512, 1550, 1643, 1651

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Example

p(3)=5, 2*5+3=13=p(6)
p(4)=7, 2*7+3=17=p(7)

Mathematica

cpQ[n_]:=Module[{p=2Prime[n]+3}, PrimeQ[p]&&NextPrime[p]==2Prime[n+1]+3]; Select[Range[1700], cpQ] (* Harvey P. Dale, Nov 29 2014 *)

Crossrefs

Subsequence of A089530. Cf. A089527, A089528, A089529.

Sequence in context: A354463 A223136 A354603 * A261051 A231397 A231464

Adjacent sequences: A089523 A089524 A089525 * A089527 A089528 A089529

Keyword

nonn

Author

Ray Chandler, Nov 07 2003

Status

approved