A098415 Greatest members r of prime triples (p,q,r) with p

11, 13, 17, 19, 23, 43, 47, 73, 103, 107, 109, 113, 197, 199, 229, 233, 283, 313, 317, 353, 463, 467, 619, 647, 827, 829, 859, 863, 883, 887, 1093, 1097, 1283, 1303, 1307, 1429, 1433, 1453, 1487, 1489, 1493, 1613, 1669, 1699, 1789, 1873, 1877, 1879, 1999

Offset: 1

Author

Reinhard Zumkeller, Sep 07 2004

Keywords

• nonn

Comments

Union of A098412 and A098413;

a(n)=A007529(n)+6; either a(n)=A098414(n)+2 or a(n)=A098414(n)+4.

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000
• Eric Weisstein's World of Mathematics, Prime Triplet

Crossrefs

Cf. A098424, A098416, A098417.

Programs

Mathematica

Transpose[Select[Partition[Prime[Range[350]],3,1],#[[3]]- #[[1]] == 6&]][[3]] (* Harvey P. Dale, Mar 17 2015 *)

PARI

is(n)=isprime(n) && isprime(n-6) && (isprime(n-2) || isprime(n-4)) \\ Charles R Greathouse IV, Feb 23 2017