A108562 Primes of the form prime(n) + prime(n+1) - 2n - 1.

2, 3, 5, 13, 17, 53, 61, 79, 103, 109, 137, 151, 163, 179, 229, 271, 277, 317, 353, 409, 419, 431, 439, 443, 491, 499, 547, 557, 569, 593, 619, 631, 641, 677, 719, 811, 887, 937, 997, 1009, 1021, 1051, 1063, 1091, 1201, 1229, 1249, 1259, 1307, 1327, 1367

Offset: 1

Author

Giovanni Teofilatto, Jul 05 2005

Keywords

• easy
• nonn

Links

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

Crossrefs

Cf. A108568.

Programs

Mathematica

Select[(#[[3]]+#[[2]]-2#[[1]]-1)&/@(Join[{PrimePi[#[[1]]]},#]&/@ Partition[ Prime[Range[200]],2,1]),PrimeQ] (* Harvey P. Dale, Sep 07 2012 *)

Extensions

Extended by Ray Chandler, Jul 10 2005