A164569 - OEIS

%I #6 Nov 21 2013 12:49:41

%S 3,13,31,73,79,151,163,181,193,241,283,349,373,379,409,421,463,601,

%T 631,673,751,769,811,829,853,883,991,1021,1039,1063,1171,1201,1303,

%U 1381,1423,1429,1453,1459,1471,1543,1549,1579,1609,1621,1663,1669,1789,1801

%N Primes p such that 11*p+8 are prime numbers.

%C Apart from the first term, a(n) = 1 (mod 6).

%e 11*3+8=41, ..

%t lst={};Do[p=Prime[n];If[PrimeQ[11*p+8],AppendTo[lst,p]],{n,6!}];lst

%t Select[Prime[Range[500]],PrimeQ[11#+8]&] (* _Harvey P. Dale_, Jul 17 2011 *)

%Y Cf. A023212, A023217, A023224, A023230, A023239

%K nonn,easy

%O 1,1

%A _Vladimir Joseph Stephan Orlovsky_, Aug 16 2009

%E Comment from _Charles R Greathouse IV_, Oct 12 2009