A087190 Numbers n such that n^4-(n+1)^3 is prime.

3, 4, 5, 6, 7, 10, 12, 16, 17, 19, 25, 26, 28, 39, 55, 56, 58, 62, 67, 72, 75, 87, 91, 95, 96, 97, 102, 111, 114, 115, 116, 124, 126, 128, 132, 137, 152, 160, 161, 172, 181, 182, 184, 191, 198, 201, 205, 208, 209, 213, 214, 217, 220, 223, 227, 235, 237, 247, 248, 250

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..5000

Example

a(1)=3 because 3^4-(3+1)^3=81-64=17 is prime.

Mathematica

lst={}; Do[If[PrimeQ[n^4-(n+1)^3], AppendTo[lst, n]], {n, 3, 1000}]; lst (* Vincenzo Librandi, Jul 16 2012 *)

Prog

(Magma) [n: n in [3..300]| IsPrime(n^4-(n+1)^3)]; // Vincenzo Librandi, Jul 16 2012
(PARI) is(n)=isprime(n^4-(n+1)^3) \\ Charles R Greathouse IV, Jun 05 2017

Crossrefs

Cf. A087191 primes of the form n^4-(n+1)^3.

Sequence in context: A158008 A106155 A271376 * A085038 A163078 A050034

Adjacent sequences: A087187 A087188 A087189 * A087191 A087192 A087193

Keyword

nonn,easy

Author

Hugo Pfoertner, Aug 23 2003

Status

approved