|
%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_
|
