A302091 Primes of form 6*k^k + 5.
11, 29, 167, 279941, 4941263
Offset: 1
Keywords
Crossrefs
Programs
-
Mathematica
Select[Table[6 n^n + 5, {n, 20}], PrimeQ] (* Harvey P. Dale, Oct 24 2021 *)
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.
Select[Table[6 n^n + 5, {n, 20}], PrimeQ] (* Harvey P. Dale, Oct 24 2021 *)
lista(nn) = forstep(n=1, nn, 2, if(ispseudoprime(p=5*n^n+4), print1(p, ", "))); \\ Altug Alkan, Apr 01 2018
Comments