|
Search: id:A128450
|
|
|
| A128450 |
|
Numbers n such that absolute value of 10^n - n^10 is prime. |
|
+0
7
|
| |
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
lst={}; k=10; Do[If[PrimeQ[Abs[k^n-n^k]], AppendTo[lst, n]], {n, 0, 10^4}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Sep 10 2008]
|
|
CROSSREFS
|
Cf. A072180, A109387, A117705, A117706, A128447, A128448, A128449, A128451, A122003, A128453, A128454.
Sequence in context: A027891 A073889 A132516 this_sequence A132562 A144984 A137036
Adjacent sequences: A128447 A128448 A128449 this_sequence A128451 A128452 A128453
|
|
KEYWORD
|
hard,more,nonn,less
|
|
AUTHOR
|
Alexander Adamchuk (alex(AT)kolmogorov.com), Mar 03 2007
|
|
|
Search completed in 0.002 seconds
|
