login
A323106
Numbers k such that 413*2^k+1 is prime.
0
1, 5, 9, 13, 25, 85, 113, 133, 185, 217, 269, 285, 469, 1025, 2289, 4849, 5681, 8489, 12937, 18485, 18809, 20189, 34361, 40509, 41593, 44181, 46517, 68681, 130421, 186893, 187937, 255137, 457801, 469901, 970353, 1387625, 2043829
OFFSET
1,2
MAPLE
select(k->isprime(413*2^k+1), [$1..1000]); # Muniru A Asiru, Jan 04 2019
MATHEMATICA
Select[Range[1000], PrimeQ[413*2^# + 1] &]
CROSSREFS
Sequence in context: A151895 A267190 A170896 * A257171 A233973 A089977
KEYWORD
nonn,more,hard
AUTHOR
Robert Price, Jan 04 2019
EXTENSIONS
a(37) from Jeppe Stig Nielsen, May 30 2020
STATUS
approved