login

Revision History for A119863

(Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing entries 1-10 | older changes
Numbers k such that k^3 + k^2 + 1 is prime.
(history; published version)
#20 by Joerg Arndt at Sat Sep 08 12:44:03 EDT 2018
STATUS

reviewed

approved

#19 by Joerg Arndt at Sat Sep 08 11:10:38 EDT 2018
STATUS

proposed

reviewed

#18 by Joerg Arndt at Sat Sep 08 11:10:35 EDT 2018
STATUS

editing

proposed

#17 by Joerg Arndt at Sat Sep 08 11:09:51 EDT 2018
MATHEMATICA

f[a_]:=a^0+a^2+a^3; lst={}; Do[If[PrimeQ[f[n]], AppendTo[lst, n]], {n, 6!}]; lst (* Vladimir Joseph Stephan Orlovsky, Jul 14 2009 *)

STATUS

proposed

editing

#16 by Michel Marcus at Sat Sep 08 11:06:12 EDT 2018
STATUS

editing

proposed

#15 by Michel Marcus at Sat Sep 08 11:06:01 EDT 2018
NAME

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

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

CROSSREFS

Cf. A005574.

STATUS

approved

editing

#14 by Charles R Greathouse IV at Wed Jan 21 00:50:43 EST 2015
STATUS

editing

approved

#13 by Charles R Greathouse IV at Wed Jan 21 00:50:40 EST 2015
PROG

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

STATUS

reviewed

editing

#12 by Michel Marcus at Wed Jan 21 00:14:11 EST 2015
STATUS

proposed

reviewed

#11 by Jon E. Schoenfield at Tue Jan 20 20:38:03 EST 2015
STATUS

editing

proposed