|
|
A201356
|
|
Numbers k such that (2^k + k + 1)*2^k + 1 is prime.
|
|
7
|
|
|
2, 3, 4, 5, 15, 23, 53, 57, 75, 233, 464, 671, 1431, 2021, 5861, 6056, 9063, 14801, 22682
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
4 is in the sequence because (2^4 + 4 + 1)*2^4 + 1 = 337 is prime.
|
|
MATHEMATICA
|
lst={}; Do[If[PrimeQ[(2^n + n+1)*2^n+1], AppendTo[lst, n]], {n, 10000}]; lst
Select[Range[9100], PrimeQ[(2^#+#+1)2^#+1]&] (* Harvey P. Dale, Dec 10 2011 *)
|
|
PROG
|
(Python)
from sympy import isprime
def afind(limit, startk=1):
pow2 = 2**startk
for k in range(startk, limit+1):
if isprime((pow2 + k + 1)*pow2 + 1):
print(k, end=", ")
pow2 *= 2
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,hard,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|