A141194 Primes of the form 16k+7.
7, 23, 71, 103, 151, 167, 199, 263, 311, 359, 439, 487, 503, 599, 631, 647, 727, 743, 823, 839, 887, 919, 967, 983, 1031, 1063, 1223, 1303, 1319, 1367, 1399, 1447, 1511, 1543, 1559, 1607, 1783, 1831, 1847, 1879, 2039, 2087, 2311, 2423, 2503, 2551, 2647
Offset: 1
Keywords
Links
- T. D. Noe, Table of n, a(n) for n=1..1000
Programs
-
Mathematica
lst={};Do[If[PrimeQ[p=16*n+7],AppendTo[lst,p]],{n,0,5!}];lst (* Vladimir Joseph Stephan Orlovsky, Jan 28 2009 *) Select[16*Range[0,200]+7,PrimeQ] (* Harvey P. Dale, Nov 26 2015 *)