A057254 Numbers n such that n | 8^n + 7^n + 6^n + 5^n + 4^n.

1, 2, 3, 5, 9, 10, 15, 21, 25, 27, 38, 45, 50, 63, 75, 81, 105, 125, 135, 147, 189, 205, 225, 243, 250, 290, 315, 345, 375, 405, 441, 525, 567, 625, 675, 729, 735, 945, 1029, 1125, 1185, 1215, 1250, 1323, 1575, 1701, 1845, 1863, 1875, 2025, 2187, 2205, 2625

Offset

1,2

Links

Table of n, a(n) for n=1..53.

Mathematica

Select[ Range[ 10^4 ], Mod[ PowerMod[ 8, #, # ] + PowerMod[ 7, #, # ] + PowerMod[ 6, #, # ] + PowerMod[ 5, #, # ] + PowerMod[ 4, #, # ], # ] == 0 & ]

Crossrefs

Sequence in context: A287158 A325835 A050158 * A057242 A273139 A303435

Adjacent sequences: A057251 A057252 A057253 * A057255 A057256 A057257

Keyword

nonn

Author

Robert G. Wilson v, Sep 21 2000

Status

approved