A127576 - OEIS

%I #10 Apr 28 2015 17:20:57

%S 31,47,79,127,191,223,239,271,367,383,431,463,479,607,719,751,863,911,

%T 991,1039,1087,1103,1151,1231,1279,1327,1423,1439,1471,1487,1567,1583,

%U 1663,1759,1823,1871,1951,1999,2063,2111,2143,2207,2239,2287,2351,2383

%N Primes of the form 16n+15.

%C Subsequence of A007522. - _R. J. Mathar_, Jan 07 2009

%H T. D. Noe, <a href="/A127576/b127576.txt">Table of n, a(n) for n = 1..1000</a>

%t a = {}; Do[If[PrimeQ[16n + 15], AppendTo[a, 16n + 15]], {n, 1, 200}]; a

%t Select[16*Range[400]+15,PrimeQ] (* _Harvey P. Dale_, Feb 06 2013 *)

%o (PARI) select(n->n%16==15, primes(100)) \\ _Charles R Greathouse IV_, Apr 28 2015

%Y Cf. A125169, A127575.

%K nonn

%O 1,1

%A _Artur Jasinski_, Jan 19 2007