%I A139405
%S A139405 2,5,9,12,24,29,32,44,54,57,74,75,80,107,110,122,129,137,152,162,165,
%T A139405 170,179,185,194,200,207,219,222,234,249,260,267,285,297,299,302,305,
%U A139405 332,339,362,414,432,452,470,500,509,519,555,557,564,570,582,584,599
%N A139405 Numbers k such that 8k+1 and 8k+7 are primes.
%t A139405 a = {}; Do[If[PrimeQ[8 n + 1] && PrimeQ[8 n + 7], AppendTo[a, n]], {n,
1, 1000}]; a
%Y A139405 Cf. A001109, A125821, A125822, A139402, A139404.
%Y A139405 Sequence in context: A034307 A070828 A112988 this_sequence A104862 A114471
A060636
%Y A139405 Adjacent sequences: A139402 A139403 A139404 this_sequence A139406 A139407
A139408
%K A139405 nonn
%O A139405 1,1
%A A139405 Artur Jasinski (grafix(AT)csl.pl), Apr 19 2008
|