|
| |
|
|
A128450
|
|
Numbers n such that absolute value of 10^n - n^10 is prime.
|
|
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 * A132562 A144984 A137036
Adjacent sequences: A128447 A128448 A128449 * A128451 A128452 A128453
|
|
|
KEYWORD
| hard,more,nonn,less
|
|
|
AUTHOR
| Alexander Adamchuk (alex(AT)kolmogorov.com), Mar 03 2007
|
| |
|
|
