A100662 Primes of the form n^3 + (n+1)^2.

5, 17, 43, 89, 593, 829, 2393, 2969, 3631, 5237, 11177, 12743, 14449, 16301, 27961, 33857, 40529, 44171, 56393, 60919, 75937, 93241, 127601, 198593, 219721, 266369, 278981, 499439, 578843, 621521, 689393, 737281, 787337, 839609, 950993, 980299

Offset

1,1

Links

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

Formula

A100705 INTERSECT A000040.

Example

a(1)=5 because 5=1^3+2^2;
a(2)=17 because 17=2^3+3^2;
a(3)=43 because 43=3^3+4^2.

Mathematica

Select[Table[n^3+(n+1)^2, {n, 200}], PrimeQ] (* Vladimir Joseph Stephan Orlovsky, Feb 01 2012 *)

Prog

(Magma) [ a: n in [0..100] | IsPrime(a) where a is n^3 + (n+1)^2 ]; // Vincenzo Librandi, Jul 18 2012
(PARI) list(lim)=my(v=List(), t); for(n=1, lim, t=n^3+(n+1)^2; if(t>lim, break); if(isprime(t), listput(v, t))); Vec(v) \\ Charles R Greathouse IV, Dec 23 2016

Crossrefs

Sequence in context: A146720 A146640 A100705 * A168617 A046916 A089527

Adjacent sequences: A100659 A100660 A100661 * A100663 A100664 A100665

Keyword

nonn,easy

Author

Giovanni Teofilatto, Jan 03 2005

Extensions

More terms from Mark Hudson, Jan 04 2005

Status

approved