OFFSET
1,1
COMMENTS
The associated k are 1, 2, 3, 7, 13, 27, 73, 994, 1129, ... - R. J. Mathar, Jun 12 2009
The next term has 475 digits. - Harvey P. Dale, Dec 12 2010
MATHEMATICA
A161470 = {}; Do[If[PrimeQ[p = (3^n + 2^n) + (n^3 - n^2)], AppendTo[A161470, p]], {n, 6!}]; A161470 (* Orlovsky *)
(* Alternate: *) Select[Table[3^k + 2^k + k^3 - k^2, {k, 2000}], PrimeQ] (* Harvey P. Dale, Dec 12 2010 *)
PROG
(Magma) [ a: n in [1..450] | IsPrime(a) where a is 3^n+2^n+n^3-n^2] // Vincenzo Librandi, Nov 30 2010
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Jun 10 2009
EXTENSIONS
Definition simplified by R. J. Mathar, Jun 12 2009
STATUS
approved