|
Search: id:A100358
|
|
|
| A100358 |
|
Numbers n such that 2^n+n^3+1 is prime. |
|
+0
3
|
|
| 0, 2, 6, 8, 20, 38, 96, 146, 236, 458, 726, 962, 1422, 2864, 3858, 5228
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MATHEMATICA
|
{ta={{0}}, tb={{0}}}; Do[g=n; s=2^n+n^3+1; If[PrimeQ[s], Print[n]; ta=Append[ta, n]; tb=Append[tb, s]], {n, 1, 10000}]; {ta, tb, g}
|
|
CROSSREFS
|
Cf. A001580, A069539, A100357.
Sequence in context: A093968 A064713 A162213 this_sequence A134136 A058775 A103023
Adjacent sequences: A100355 A100356 A100357 this_sequence A100359 A100360 A100361
|
|
KEYWORD
|
more,nonn
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), Nov 19 2004
|
|
|
Search completed in 0.003 seconds
|
