Search: id:A087695 Results 1-1 of 1 results found. %I A087695 %S A087695 8,10,14,16,20,26,34,40,44,50,56,64,70,76,86,100,104,106,110,134,154, %T A087695 160,170,176,194,196,226,230,236,254,260,266,274,280,310,314,334,350, %U A087695 356,370,376,386,436,446,460,464,506,544,560,566,574,590,596 %N A087695 Numbers n such that n +/- 3 are both prime. %p A087695 ZL:=[]:for p from 1 to 600 do if (isprime(p) and isprime(p+6) ) then ZL:=[op(ZL),(p+(p+6))/2]; fi; od; print(ZL); - Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), Mar 07 2007 %t A087695 lst={};Do[If[PrimeQ[n-3]&&PrimeQ[n+3], AppendTo[lst, n]], {n, 10^3}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Sep 08 2008] %Y A087695 Cf. A014574, A087678-A087683, A087695-A087697, A088763. %Y A087695 Equals A046117 - 3. %Y A087695 Sequence in context: A167692 A163628 A060864 this_sequence A134321 A027693 A100718 %Y A087695 Adjacent sequences: A087692 A087693 A087694 this_sequence A087696 A087697 A087698 %K A087695 easy,nonn %O A087695 1,1 %A A087695 Zak Seidov (zakseidov(AT)yahoo.com), Sep 27 2003 Search completed in 0.001 seconds