%I A023271
%S A023271 5,11,41,61,251,601,641,1091,1481,1601,1741,1861,2371,2671,3301,3911,
%T A023271 4001,5101,5381,5431,5641,6311,6361,9461,11821,12101,12641,13451,14621,
%U A023271 14741,15791,15901,17471,18211,19471,20341,21481,23321,24091,26171,26681
%N A023271 Primes p such that (p,p+6,p+12,p+18) are all primes.
%C A023271 Smallest member of a "sexy" prime quadruple.
%H A023271 Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/
               SexyPrimes.html">Sexy Primes</a>.
%t A023271 lst={};Do[p=Prime[n];If[PrimeQ[p+6]&&PrimeQ[p+12]&&PrimeQ[p+18], AppendTo[lst, 
               p]], {n, 8!}];lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), 
               Aug 29 2008]
%Y A023271 Cf. A023201, A046117.
%Y A023271 Cf. A046122, A046123, A046124.
%Y A023271 Sequence in context: A154297 A089441 A046121 this_sequence A159049 A047976 
               A006382
%Y A023271 Adjacent sequences: A023268 A023269 A023270 this_sequence A023272 A023273 
               A023274
%K A023271 nonn
%O A023271 1,1
%A A023271 David W. Wilson (davidwwilson(AT)comcast.net)
%E A023271 Edited by N. J. A. Sloane, Aug 04 2009 following a suggestion from Daniel 
               Forgues