1,2
Do[If[PrimeQ[8n + 3] && PrimeQ[8n + 5], Print[n]], {n, 1, 1000}] (*Artur Jasinski*)
Cf. A001109, A125821, A125822.
Sequence in context: A013652 A099988 A076947 this_sequence A034102 A034112 A043104
Adjacent sequences: A124189 A124190 A124191 this_sequence A124193 A124194 A124195
nonn
Artur Jasinski (grafix(AT)csl.pl), Dec 10 2006
Search completed in 0.002 seconds