|
|
A300408
|
|
Primes of the form 19*2^n + 1.
|
|
3
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Next term a(4) = 19*2^366 + 1 > 10^111.
For the corresponding exponents n see A032359.
|
|
LINKS
|
|
|
MAPLE
|
a:=(n, k)->`if`(isprime(k*2^n+1), k*2^n+1, NULL):
seq(a(n, 19), n=1..366);
|
|
PROG
|
(GAP) Filtered(List([1..500], n->19*2^n + 1), IsPrime); # Muniru A Asiru, Mar 06 2018
(PARI) lista(nn) = {for(k=1, nn, if(ispseudoprime(p=19*2^k+1), print1(p, ", "))); } \\ Altug Alkan, Mar 29 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,less
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|