|
|
A206581
|
|
Odd primes p such that p+1 is a prime times a power of two.
|
|
7
|
|
|
5, 11, 13, 19, 23, 37, 43, 47, 61, 67, 73, 79, 103, 151, 157, 163, 191, 193, 211, 223, 271, 277, 283, 313, 331, 367, 383, 397, 421, 457, 463, 487, 523, 541, 547, 607, 613, 631, 661, 673, 691, 733, 751, 757, 787, 823, 877, 907, 991, 997, 1051, 1087, 1093
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Very similar to A192869; here p+1 = q*2^k, where q must be prime.
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
Select[Prime[Range[2, 1000]], PrimeQ[(#+1)/2^IntegerExponent[#+1, 2]] &]
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|