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.
%I A301521 #19 Apr 22 2019 11:46:08 %S A301521 2,4,5,7,22,1045 %N A301521 Numbers k such that 4*k^k - 3 is prime. %C A301521 Next term, if it exists, is greater than 5000. - _Vaclav Kotesovec_, Mar 25 2018 %C A301521 Next term, if it exists, is greater than 25000. - _Robert Price_, Apr 22 2019 %t A301521 Select[Range[1000], PrimeQ[4*#^# - 3] &] (* _Vaclav Kotesovec_, Mar 25 2018 *) %o A301521 (PARI) for(n=0, 100, if(isprime(4*n^n-3), print1(n", "))) %Y A301521 Cf. A301520, A301870. %K A301521 nonn,hard,more %O A301521 1,1 %A A301521 _Seiichi Manyama_, Mar 23 2018 %E A301521 a(6) from _Vaclav Kotesovec_, Mar 25 2018