A378134 a(n) is the smallest prime p such that (2*p)^(2^n) + 1 is also prime.
2, 2, 2, 2, 37, 281, 137, 2129, 139, 23, 1231, 1279, 17477
Offset: 0
Crossrefs
Extensions
a(11)-a(12) from Michael S. Branicky, Nov 18 2024
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(1500) | IsPrime(16*p^4+1)];
Select[Prime[Range[250]], PrimeQ[16*#^4 + 1] &] (* Amiram Eldar, Nov 17 2024 *)
list(lim)=my(v=List()); forprime(p=2,lim, if(isprime(16*p^4+1), listput(v,p))); Vec(v) \\ Charles R Greathouse IV, Nov 17 2024
[p: p in PrimesUpTo(8000) | IsPrime(256*p^8 + 1)];
Select[Prime[Range[1000]], PrimeQ[(2*#)^8 + 1] &] (* Amiram Eldar, Dec 06 2024 *)
select(p->isprime(256*p^8+1), primes(10^6)) \\ Charles R Greathouse IV, Dec 04 2024