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

%I #6 Sep 07 2012 15:56:25

%S 2,3,5,13,17,53,61,79,103,109,137,151,163,179,229,271,277,317,353,409,

%T 419,431,439,443,491,499,547,557,569,593,619,631,641,677,719,811,887,

%U 937,997,1009,1021,1051,1063,1091,1201,1229,1249,1259,1307,1327,1367

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

%H Harvey P. Dale, <a href="/A108562/b108562.txt">Table of n, a(n) for n = 1..1000</a>

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

%Y Cf. A108568.

%K easy,nonn

%O 1,1

%A _Giovanni Teofilatto_, Jul 05 2005

%E Extended by _Ray Chandler_, Jul 10 2005