cp's OEIS Frontend

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.

Showing 1-2 of 2 results.

A119448 Primes of the form k^k + k^2 + 1.

Original entry on oeis.org

2, 3, 37, 285311670733, 1102507499354148695951786433413508348166942596435548101, 3877924263464448622666648186154330754898344901344205917642325627886496385065073
Offset: 1

Views

Author

Jonathan Vos Post, Jul 26 2006

Keywords

Comments

The values of k such that k^k + k^2 + 1 is prime are 1, 3, 11, 35, 47, ...
0^0 + 0^2 + 1 = 2. - Vincenzo Librandi, Dec 22 2010
The next term has 176 digits. - Harvey P. Dale, Feb 07 2018

Examples

			a(3) = 11^11 + 11^2 + 1 = 285311670733 is prime.
		

Crossrefs

Programs

  • Magma
    [a: n in [0..250]|IsPrime(a) where a is n^n+n^2+1] // Vincenzo Librandi, Dec 22 2010
  • Mathematica
    Join[{2},Select[Table[n^n+n^2+1,{n,50}],PrimeQ]] (* Harvey P. Dale, Feb 07 2018 *)

Extensions

2 added by Vincenzo Librandi, Dec 22 2010

A119987 Primes of the form k^k + k^3 + 1.

Original entry on oeis.org

2, 3, 13, 3251, 16777729, 387421219, 11112006825560761, 443426488243037769948249630619149912487, 1075911801979993982060429252856123779115487368830416064665177
Offset: 1

Views

Author

Jonathan Vos Post, Aug 03 2006

Keywords

Comments

The values of k such that k^k + k^2 + 1 is prime are 0, 1, 2, 5, 8, 9, 14, 27, 38, 62, 255, (4000), .... per Vincenzo Librandi's extension, 2 is an element iff one defines 0^0 = 1.

Crossrefs

Programs

  • Magma
    [ a: n in [0..250] | IsPrime(a) where a is n^n+n^3+1 ]; // Vincenzo Librandi, Dec 22 2010
    
  • Mathematica
    f[n_] := (n^n + n^3 + 1); Select[f@ Range@ 40, PrimeQ]
  • PARI
    for(n=1, 255, if(ispseudoprime(t=n^n+n^3+1), print1(t", "))); v \\ Charles R Greathouse IV, Feb 17 2011

Extensions

2 added by Vincenzo Librandi, Dec 22 2010
Showing 1-2 of 2 results.