A300408 Primes of the form 19*2^n + 1.
1217, 19457, 1337006139375617
Offset: 1
Links
- Ray Ballinger, Wilfried Keller, List of primes k*2^n + 1 for k < 300.
Crossrefs
Programs
-
GAP
Filtered(List([1..500],n->19*2^n + 1),IsPrime); # Muniru A Asiru, Mar 06 2018
-
Maple
a:=(n,k)->`if`(isprime(k*2^n+1), k*2^n+1, NULL): seq(a(n,19), n=1..366);
-
PARI
lista(nn) = {for(k=1, nn, if(ispseudoprime(p=19*2^k+1), print1(p, ", ")));} \\ Altug Alkan, Mar 29 2018
Comments