OFFSET
1,1
LINKS
Ray Ballinger, Proth Search Page
Ray Ballinger and Wilfrid Keller, List of primes k.2^n + 1 for k < 300
Wilfrid Keller, List of primes k.2^n - 1 for k < 300
MATHEMATICA
Select[Range[1000], PrimeQ[13*2^#+1] &] (* Amiram Eldar, Dec 12 2018 *)
PROG
(PARI) is(n)=ispseudoprime(13*2^n+1) \\ Charles R Greathouse IV, May 22 2017
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
EXTENSIONS
Added more terms (from http://web.archive.org/web/20161028080239/http://www.prothsearch.net/riesel.html), Joerg Arndt, Apr 07 2013
a(23) from http://www.prothsearch.com/riesel1.html by Robert Price, Dec 12 2018
a(24) from Jeppe Stig Nielsen, Jan 24 2020
a(25)-a(26) from Jeppe Stig Nielsen, Dec 21 2024
STATUS
approved