%I A046124
%S A046124 23,29,59,79,269,619,659,1109,1499,1619,1759,1879,2389,2689,3319,3929,
%T A046124 4019,5119,5399,5449,5659,6329,6379,9479,11839,12119,12659,13469,
%U A046124 14639,14759,15809,15919,17489,18229,19489,20359,21499,23339,24109
%N A046124 Last member of a sexy prime quadruple: value of p+18 where (p,p+6,p+12,
               p+18) are all prime.
%H A046124 Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/
               SexyPrimes.html">Link to a section of The World of Mathematics.</
               a>
%t A046124 lst={};Do[p=Prime[n];If[PrimeQ[p+6]&&PrimeQ[p+12]&&PrimeQ[p+18], AppendTo[lst, 
               p+18]], {n, 8!}];lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), 
               Aug 29 2008]
%Y A046124 Cf. A023271, A046122, A046123.
%Y A046124 Sequence in context: A045120 A097436 A063980 this_sequence A157677 A092518 
               A110584
%Y A046124 Adjacent sequences: A046121 A046122 A046123 this_sequence A046125 A046126 
               A046127
%K A046124 nonn
%O A046124 1,1
%A A046124 Eric Weisstein (eric(AT)weisstein.com)