

A098412


Greatest members p of prime triples (p6, p4, p).


10



11, 17, 23, 47, 107, 113, 197, 233, 317, 353, 467, 647, 827, 863, 887, 1097, 1283, 1307, 1433, 1487, 1493, 1613, 1877, 2003, 2087, 2243, 2273, 2663, 2693, 3257, 3467, 3533, 3677, 3923, 4007, 4133, 4523, 4643, 4793, 4937, 4973, 5237, 5483, 5507, 5657, 6203
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

Subsequence of A046117; a(n) = A073648(n) + 4 = A022004(n) + 6.


LINKS

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


MAPLE

K:=10^7: # to get all terms <= K.
for n from 1 by 2 to K do; if isprime(n6) and isprime(n4) and isprime(n) then print(n) else fi; od; # Muniru A Asiru, Aug 06 2017


MATHEMATICA

Select[Table[Prime[n], {n, 1000}], PrimeQ[#  4] && PrimeQ[#  6] &] (* Vladimir Joseph Stephan Orlovsky, Jun 19 2011 *)
Select[Partition[Prime[Range[1000]], 3, 1], Differences[#]=={2, 4}&][[All, 3]] (* Harvey P. Dale, Sep 23 2017 *)


PROG

(MAGMA)[p: p in PrimesUpTo(6500)IsPrime(p) and IsPrime(p6) and IsPrime(p4)]; // Vincenzo Librandi, Dec 26 2010


CROSSREFS

Cf. A098413, A098415.
Sequence in context: A031505 A094524 A243817 * A261918 A136342 A126609
Adjacent sequences: A098409 A098410 A098411 * A098413 A098414 A098415


KEYWORD

nonn


AUTHOR

Reinhard Zumkeller, Sep 07 2004


STATUS

approved



