A162358 The larger member q in a pair of successive primes (p,q) such that p*q+p+q is prime.

3, 5, 7, 13, 17, 19, 23, 29, 43, 47, 53, 61, 83, 89, 97, 103, 113, 127, 139, 167, 173, 179, 227, 233, 263, 313, 389, 397, 419, 421, 443, 449, 487, 523, 557, 563, 587, 599, 617, 647, 653, 691, 787, 809, 811, 821, 857, 967, 991, 1021, 1051, 1103, 1117, 1153, 1181

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Jul 01 2009

Keywords

• nonn

Examples

			q=3 is the larger member in (2,3) where 2*3+2+3=11 is prime.
q=5 is the larger member in (3,5) where 3*5+3+5=23 is prime.
		

Links

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

Crossrefs

Cf. A096342, A126148

Programs

Mathematica

lst={};Do[p=Prime[n]*Prime[n+1]+Prime[n]+Prime[n+1];If[PrimeQ[p],AppendTo[lst, Prime[n+1]]],{n,6!}];lst
Transpose[Select[Partition[Prime[Range[200]],2,1],PrimeQ[ Times@@#+ Total[ #]]&]] [[2]] (* Harvey P. Dale, Jan 19 2016 *)

Formula

a(n) = A151800(A126148(n)).

Extensions

Definition rephrased by R. J. Mathar, Sep 11 2009