A031907 a(n) = prime(7*n - 5).
3, 23, 53, 83, 113, 157, 193, 233, 271, 313, 359, 401, 443, 487, 541, 587, 619, 661, 719, 761, 821, 859, 911, 967, 1013, 1051, 1097, 1153, 1213, 1259, 1301, 1367, 1429, 1471, 1511, 1567, 1609, 1663, 1721, 1777, 1831, 1879, 1949, 1999, 2053
Offset: 1
Keywords
Programs
-
Magma
[ NthPrime(7*n-5): n in [1..1000] ]; // Vincenzo Librandi, Apr 10 2011
-
Mathematica
Prime[7*Range[50]-5] (* Harvey P. Dale, May 12 2014 *)