login
Exactly 3 out of 10m+1, 10m+3, 10m+7, 10m+9 are primes.
6

%I #27 Nov 03 2023 11:02:23

%S 4,7,13,22,31,43,46,61,64,85,88,103,106,109,130,142,145,160,166,169,

%T 178,199,238,268,271,316,367,376,391,400,409,415,421,451,472,478,493,

%U 523,541,544,547,550,574

%N Exactly 3 out of 10m+1, 10m+3, 10m+7, 10m+9 are primes.

%H V. Raman, <a href="/A008471/b008471.txt">Table of n, a(n) for n = 1..10000</a> (first 1000 terms from Harvey P. Dale)

%t m3Q[m_]:=Module[{c=10m},Count[{c+1,c+3,c+7,c+9},_?PrimeQ]==3]; Select[ Range[ 600],m3Q] (* _Harvey P. Dale_, Dec 24 2011 *)

%o (Magma) [n: n in [1..600] | #PrimesInInterval(10*n+1, 10*n+9) eq 3]; // _Bruno Berselli_, Sep 04 2012

%Y Cf. A007811, A032352, A216292, A216293.

%K nonn

%O 1,1

%A _Olivier GĂ©rard_