This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
[p: p in PrimesUpTo (10000) | IsPrime(5*2^p+1)];
select(p->isprime(p) and isprime(5*2^p+1),[$0..5000]); # Muniru A Asiru, Dec 19 2018
Select[Prime[Range[4000]], PrimeQ[5 2^# + 1] &]
Filtered([1..1000], p -> IsPrime(p) and IsPrime(11*2^p+1)); # Muniru A Asiru, Dec 20 2018
[p: p in PrimesUpTo (6000) | IsPrime(11*2^p+1)];
select(p->isprime(p) and isprime(11*2^p+1),[$1..1000]); # Muniru A Asiru, Dec 20 2018
Select[Prime[Range[1000]], PrimeQ[11 2^# + 1] &]
3 is a term because 12*2^3+1 = 97 (prime).
[p: p in PrimesUpTo (3500) | IsPrime(12*2^p+1)];
Select[Prime[Range[3500]],PrimeQ[12 2^#+1]&]
Comments