OFFSET
1,1
COMMENTS
The next term is too large to include.
FORMULA
MATHEMATICA
f[n_]:=2^n+n^3; lst={}; Do[If[PrimeQ[f[n]], AppendTo[lst, f[n]]], {n, 2*6!}]; lst
CROSSREFS
KEYWORD
nonn,bref
AUTHOR
Vladimir Joseph Stephan Orlovsky, Jul 24 2009
EXTENSIONS
It would be better to give the corresponding values of n. - N. J. A. Sloane, Jul 25 2009
STATUS
approved