A119863 Numbers k such that k^3 + k^2 + 1 is prime.

1, 2, 3, 5, 8, 9, 11, 12, 23, 24, 26, 30, 35, 42, 44, 45, 47, 53, 56, 57, 62, 66, 68, 69, 71, 74, 86, 87, 89, 92, 101, 111, 120, 122, 123, 125, 140, 143, 147, 152, 170, 177, 179, 180, 191, 192, 195, 198, 203, 209, 219, 224, 230, 234, 239, 243, 245, 246, 254, 255, 263

Offset

1,2

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Example

92^3 + 92^2 + 1 = 787153 (prime), so 92 is in the sequence.

Maple

a:=proc(n) if isprime(n^3+n^2+1)=true then n else fi end: seq(a(n), n=0..300); # Emeric Deutsch, Aug 04 2006

Mathematica

Select[Range[300], PrimeQ[#^3+#^2+1]&] (* Harvey P. Dale, May 03 2014 *)

Prog

(PARI) is(n)=isprime(n^3+n^2+1) \\ Charles R Greathouse IV, Jan 21 2015

Crossrefs

Cf. A005574.

Sequence in context: A286486 A285092 A027756 * A285253 A047254 A226815

Adjacent sequences: A119860 A119861 A119862 * A119864 A119865 A119866

Keyword

nonn

Author

Parthasarathy Nambi, Jul 31 2006

Extensions

More terms from Emeric Deutsch and R. J. Mathar, Aug 04 2006

Status

approved