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”).
%I #9 Dec 09 2013 13:05:35
%S 5,15,35,55,65,75,105,155,205,215,225,275,285,295,365,405,435,475,495,
%T 555,565,595,625,665,695,735,765,825,895,945,985,1055,1085,1115,1155,
%U 1205,1225,1265,1315,1335,1385,1505,1595,1605,1645,1745,1805,1835,1885
%N Numbers n such that 3*n+2 and 3*n-2 are both prime for n multiple of 5 (A008587).
%F Intersection of A008587 and A157834.
%e For n=15; 3*15+2=47 and 3*15-2=43.
%t Select[5*Range[500], PrimeQ[3 # + 2] && PrimeQ[3 # - 2] &] (* _T. D. Noe_, Dec 09 2013 *)
%o (TI-BASIC) Clrio:5(sto)n:Lbl colorin:if isPrime(3n+2) and isPrime(3n-2) Then:Disp n:Pause: EndIf:n+5(sto)n:Goto colorin:EndPrgm
%Y Cf. A157834 (n such that 3n-2 and 3n+2 are both prime).
%K nonn,less
%O 1,1
%A _César Aguilera_, Dec 07 2013