login
A085958
Primes p such that 8p +1 and (p-1)/8 are primes.
5
17, 137, 809, 857, 3209, 6569, 7577, 9209, 11897, 16217, 17657, 19289, 21929, 23417, 30809, 35129, 37529, 41849, 46889, 53609, 56009, 66377, 70457, 74729, 76697, 78809, 80537, 88937, 91577, 95177, 96857, 103289, 129497, 141257, 165449, 166169
OFFSET
1,1
EXAMPLE
137 is a term as (137-1)/8 = 17 and 137*8 +1 = 1097 both are primes.
MATHEMATICA
Prime[ Select[ Range[15208], PrimeQ[ 8Prime[ # ] + 1] && PrimeQ[(Prime[ # ] - 1)/8] & ]]
Select[Prime[Range[16000]], PrimeQ[8#+1]&&PrimeQ[(#-1)/8]&] (* Harvey P. Dale, Jan 23 2013 *)
CROSSREFS
Sequence in context: A142788 A361150 A244874 * A120784 A357550 A271395
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Jul 16 2003
EXTENSIONS
Edited and extended by Zak Seidov and Robert G. Wilson v, Jul 18 2003
STATUS
approved