Search: id:A046117 Results 1-1 of 1 results found. %I A046117 %S A046117 11,13,17,19,23,29,37,43,47,53,59,67,73,79,89,103,107,109,113,137,157, %T A046117 163,173,179,197,199,229,233,239,257,263,269,277,283,313,317,337,353, %U A046117 359,373,379,389,439,449,463,467,509,547,563,569,577,593,599,607,613 %N A046117 Values of p+6 where (p,p+6) are both prime. %H A046117 T. D. Noe, Table of n, a(n) for n=1..1000 %H A046117 Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics. %t A046117 q=6; a={}; Do[p1=Prime[n]; p2=p1+q; If[PrimeQ[p2], AppendTo[a, p2]], {n, 7^2}]; a "and/or" Select[Prime[Range[3, 7^2]], PrimeQ[ # ]&&PrimeQ[ #-6]&] [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Aug 07 2008] %Y A046117 Cf. A023201, A046117. %Y A046117 Cf. A098428. %Y A046117 Equals A087695 + 3. %Y A046117 Sequence in context: A078875 A052293 A038842 this_sequence A091923 A050719 A098415 %Y A046117 Adjacent sequences: A046114 A046115 A046116 this_sequence A046118 A046119 A046120 %K A046117 nonn %O A046117 1,1 %A A046117 Eric Weisstein (eric(AT)weisstein.com) Search completed in 0.002 seconds