A039949 Primes of the form 30n - 13.
17, 47, 107, 137, 167, 197, 227, 257, 317, 347, 467, 557, 587, 617, 647, 677, 797, 827, 857, 887, 947, 977, 1097, 1187, 1217, 1277, 1307, 1367, 1427, 1487, 1607, 1637, 1667, 1697, 1787, 1847, 1877, 1907, 1997, 2027, 2087, 2207, 2237, 2267, 2297, 2357, 2417
Offset: 1
References
- C. Clawson, Mathematical Mysteries, Plenum Press, 1996, p. 173
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[p: p in PrimesUpTo(3000) | p mod 30 in [17]]; // Vincenzo Librandi, Aug 04 2012
-
Mathematica
Select[Prime[Range[1000]],MemberQ[{17},Mod[#,30]]&] (* Vincenzo Librandi, Aug 04 2012 *) Select[Range[17,3000,30],PrimeQ] (* Zak Seidov, Apr 15 2015 *)
-
PARI
select(n->n%30==17, primes(500)) \\ Charles R Greathouse IV, Apr 28 2015
Formula
a(n) = A158648(n)*30 + 17. - Ray Chandler, Apr 07 2009
a(n) = A141860(n+1). - Zak Seidov, Apr 15 2015
Extensions
Extended by Ray Chandler, Apr 07 2009
Comments