A142427 Primes congruent to 16 mod 49.
163, 359, 457, 653, 751, 947, 2221, 2417, 2711, 3299, 3593, 3691, 5651, 5749, 6043, 6337, 6827, 7121, 7219, 8101, 8297, 8689, 9277, 9473, 9767, 10061, 10159, 10453, 11923, 12119, 12413, 12511, 13001, 13099, 13687, 13883, 14177, 15451, 15647, 16333, 16529, 16823
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A000040.
Programs
-
Magma
[p: p in PrimesUpTo(17000) | p mod 49 eq 16]; // Vincenzo Librandi, Aug 28 2012
-
Mathematica
Select[Prime[Range[2500]], MemberQ[{16}, Mod[#,49]] &] (* Vincenzo Librandi, Aug 28 2012 *) Select[Range[16,17000,49],PrimeQ] (* Harvey P. Dale, Mar 06 2019 *)
-
PARI
is(n)=isprime(n) && n%49==16 \\ Charles R Greathouse IV, Jul 03 2016
Formula
a(n) ~ 42n log n. - Charles R Greathouse IV, Jul 03 2016