A142367 - OEIS

%I #9 Sep 08 2022 08:45:36

%S 157,251,439,1097,1567,2131,2789,3259,3541,3823,3917,4481,4951,5233,

%T 6079,6173,6361,6737,7019,7207,7489,7583,8053,8147,8429,9181,9463,

%U 9839,11437,11719,11813,12377,12659,12941,13411,13693,14633,14821,15667,15761,16231

%N Primes congruent to 16 mod 47.

%H Vincenzo Librandi, <a href="/A142367/b142367.txt">Table of n, a(n) for n = 1..1000</a>

%F a(n) ~ 46n log n. - _Charles R Greathouse IV_, Jul 03 2016

%t Select[Prime[Range[2500]],MemberQ[{16},Mod[#,47]]&] (* _Vincenzo Librandi_, Aug 27 2012 *)

%o (Magma) [p: p in PrimesUpTo(18000) | p mod 47 eq 16]; // _Vincenzo Librandi_, Aug 27 2012

%o (PARI) is(n)=isprime(n) && n%47==16 \\ _Charles R Greathouse IV_, Jul 03 2016

%Y Cf. A000040.

%K nonn,easy

%O 1,1

%A _N. J. A. Sloane_, Jul 11 2008