login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A046120
Largest member of a sexy prime triple; value of p+12 where p, p+6 and p+12 are all prime, but p+18 is not.
6
19, 29, 43, 59, 79, 109, 113, 163, 179, 239, 269, 283, 359, 379, 569, 599, 619, 659, 739, 953, 983, 1109, 1129, 1193, 1229, 1289, 1303, 1373, 1439, 1459, 1499, 1619, 1669, 1759, 1789, 1879, 1913, 1999, 2143, 2293, 2389, 2423, 2689, 2699, 2719
OFFSET
1,1
COMMENTS
If a sexy prime triple happens to include the last 3 members of a sexy prime quadruple, this sequence will contain the sexy prime triple's largest member; e.g., a(4)=59 is the largest member of the sexy prime triple (47, 53, 59), but is the fourth member of the sexy prime quadruple (41, 47, 53, 59). - Daniel Forgues, Aug 05 2009
LINKS
Eric Weisstein's World of Mathematics, Sexy Primes. [The definition in this webpage is unsatisfactory, because it defines a "sexy prime" as a pair of primes.- N. J. A. Sloane, Mar 07 2021].
FORMULA
a(n) = A046118(n)+12 and a(n) = A046119(n)+6. - Michel Marcus, Jan 06 2015
MATHEMATICA
lst={}; Do[p=Prime[n]; If[PrimeQ[p+6]&&PrimeQ[p+12]&&!PrimeQ[p+18], AppendTo[lst, p+12]], {n, 7!}]; lst (* Vladimir Joseph Stephan Orlovsky, Aug 29 2008 *)
#+12&/@Select[Prime[Range[400]], PrimeQ[#+{6, 12, 18}]=={True, True, False}&] (* Harvey P. Dale, Dec 08 2012 *)
CROSSREFS
KEYWORD
nonn
STATUS
approved