A061239 Prime numbers == 4 (mod 9).
13, 31, 67, 103, 139, 157, 193, 211, 229, 283, 337, 373, 409, 463, 499, 571, 607, 643, 661, 733, 751, 769, 787, 823, 859, 877, 967, 1021, 1039, 1093, 1129, 1201, 1237, 1291, 1327, 1381, 1399, 1453, 1471, 1489, 1543, 1579, 1597, 1669, 1723, 1741, 1759
Offset: 1
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[ p: p in PrimesUpTo(2000) | p mod 9 in {4} ]; // Vincenzo Librandi, Dec 25 2010
-
Mathematica
Select[ Range[ 2000 ], PrimeQ[ # ] && Mod[ #, 9 ] == 4 & ] Select[Prime[Range[300]],Mod[#,9]==4&] (* Harvey P. Dale, Aug 20 2015 *)
-
PARI
select(n->n%9==4, primes(400)) \\ Charles R Greathouse IV, May 27 2014
Formula
a(n) ~ 6n log n. - Charles R Greathouse IV, May 14 2025
Extensions
More terms from Robert G. Wilson v, May 10 2001
Comments