A127578 Primes congruent to 31 mod 32.

31, 127, 191, 223, 383, 479, 607, 863, 991, 1087, 1151, 1279, 1439, 1471, 1567, 1663, 1759, 1823, 1951, 2111, 2143, 2207, 2239, 2399, 2591, 2687, 2719, 2879, 3167, 3359, 3391, 3583, 3967, 4127, 4159, 4447, 4639, 4703, 4799, 4831, 5023, 5087, 5119, 5279

Offset: 1

Author

Artur Jasinski, Jan 19 2007

Keywords

• nonn
• easy

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A000040, A127575, A127576, A127577, A127579, A127580, A127581.

Programs

Magma

[p: p in PrimesUpTo(6000) | p mod 32 eq 31 ]; // Vincenzo Librandi, Aug 14 2012

Mathematica

lst={};Do[p=Prime[n];If[Mod[p,32]==31,AppendTo[lst,p]],{n,7!}];lst (* Vladimir Joseph Stephan Orlovsky, Feb 26 2009 *)
Select[Prime[Range[6000]],Mod[#,32]==31&] (* Vincenzo Librandi, Aug 14 2012 *)
Select[Range[31,5300,32],PrimeQ] (* Harvey P. Dale, Oct 03 2012 *)

PARI

is(n)=isprime(n) && n%32==31 \\ Charles R Greathouse IV, Jul 01 2016

Extensions

Corrected by N. J. A. Sloane, Jul 11 2008

Edited by N. J. A. Sloane at the suggestion of R. J. Mathar, Jul 20 2008