%I #29 Feb 05 2024 00:55:17
%S 0,1,2,5,7,8,10,13,16,17,20,22,26,28,31,35,38,41,43,47,52,55,58,61,62,
%T 65,68,70,71,73,77,80,82,85,86,92,98,101,103,107,110,113,118,121,127,
%U 131,136,140,145,146,148,157,160,161,163,178,181,182,185,187
%N Numbers k such that 8k + 3 is prime.
%H Harvey P. Dale, <a href="/A005124/b005124.txt">Table of n, a(n) for n = 1..1000</a>
%t (#-3)/8&/@Select[Range[3,1303,8],PrimeQ] (* _Harvey P. Dale_, May 19 2012 *)
%t Select[Range[0, 300], PrimeQ[8 # + 3] &] (* _Vincenzo Librandi_, Jun 25 2014 *)
%o (Magma) [n: n in [0..200] | IsPrime(8*n+3)]; // _Vincenzo Librandi_, Jun 25 2014
%o (PARI) is(n)=isprime(8*n+3) \\ _Charles R Greathouse IV_, Feb 17 2017
%K nonn
%O 1,3
%A _N. J. A. Sloane_
%E More terms from _Wesley Ivan Hurt_, Jun 25 2014