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

1, 3, 9, 13, 27, 39, 51, 81, 117, 169, 243, 351, 507, 729, 1053, 1521, 2187, 2197, 3159, 4131, 4563, 4941, 6561, 6591, 7047, 9477, 12207, 13203, 13689, 16281, 19683, 19773, 28431, 28561, 33969, 36621, 39609, 41067, 45981, 59049, 59319, 77571

Offset

1,2

Links

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

Mathematica

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

Crossrefs

Sequence in context: A303964 A124825 A074938 * A107364 A014861 A018407

Adjacent sequences: A057257 A057258 A057259 * A057261 A057262 A057263

Keyword

nonn

Author

Robert G. Wilson v, Sep 21 2000

Status

approved