|
Search: id:A100361
|
|
|
| A100361 |
|
Numbers n such that 2^n-n+1 is prime. |
|
+0
2
|
|
| 0, 1, 2, 4, 6, 16, 18, 54, 58, 100, 120, 504, 1302, 3234
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
MATHEMATICA
|
{ta={{0}}, tb={{0}}}; Do[g=n; s=2^n-n+1; If[PrimeQ[s], Print[n]; ta=Append[ta, n]; tb=Append[tb, s]], {n, 1, 10000}]; {ta, tb, g}
|
|
CROSSREFS
|
Cf. A001580, A069539, A052007, A048744, A100357-A100359, A061421.
Sequence in context: A096174 A096173 A114874 this_sequence A069654 A000068 A067662
Adjacent sequences: A100358 A100359 A100360 this_sequence A100362 A100363 A100364
|
|
KEYWORD
|
hard,more,nonn
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), Nov 19 2004
|
|
|
Search completed in 0.002 seconds
|
