A160951 - OEIS

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

%S 13,19,23,29,31,37,41,47,61,67,71,73,83,103,109,113,127,137,139,149,

%T 163,167,197,199,223,227,229,233,241,251,257,269,271,277,283,293,311,

%U 317,353,359,367,373,379,389,397,409,419,421,431,449,457,463,467,479,487

%N Primes p such that 2p + 1155 is prime.

%C 2*13+1155=1181

%H Harvey P. Dale, <a href="/A160951/b160951.txt">Table of n, a(n) for n = 1..1000</a>

%t a=3*5*7*11;lst={};Do[p=Prime[n];If[PrimeQ[2*p+a],AppendTo[lst,p]],{n,6!}];lst

%t Select[Prime[Range[200]],PrimeQ[2#+1155]&] (* _Harvey P. Dale_, Sep 24 2011 *)

%K nonn

%O 1,1

%A _Vladimir Joseph Stephan Orlovsky_, May 30 2009

%E Edited by _Charles R Greathouse IV_, Nov 11 2009