A086476 Primes p such that 32p+1 and (p-1)/32 are both prime.

1889, 8609, 11489, 25889, 32609, 46049, 67169, 98849, 99809, 107873, 120929, 124193, 128033, 139169, 142433, 157793, 167393, 168353, 196193, 208673, 210209, 241313, 288929, 295073, 308129, 311009, 324449, 354209, 377633, 396833, 403553

Offset: 1

Author

Amarnath Murthy and Jason Earls, Jul 22 2003

Keywords

• nonn

Examples

			1889 is a member as (1889-1)/32 = 59 and 32*1889 + 1= 60449 are both prime.
		

Crossrefs

Cf. A085957, A085958, A086477, A086478.

Programs

Mathematica

Prime[ Select[ Range[37063], PrimeQ[(Prime[ # ] - 1)/2^5] && PrimeQ[2^5Prime[ # ] + 1] & ]]
Select[Prime[Range[35000]],And@@PrimeQ[{32#+1,(#-1)/32}]&] (* Harvey P. Dale, Jan 23 2013 *)

Extensions

Edited and extended by Robert G. Wilson v, Jul 26 2003