A057262 Numbers n such that n | 7^n + 6^n + 5^n + 4^n + 3^n + 2^n.

1, 3, 9, 27, 81, 87, 243, 729, 1027, 1467, 2187, 2781, 6561, 19683, 35901, 59049, 62613, 63423, 63909, 136503, 137133, 177147, 531441, 925101, 1594323, 2785509, 3680883, 4782969, 5080077, 6409507

Offset

1,2

Links

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

Mathematica

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

Crossrefs

Sequence in context: A036158 A036136 A271350 * A057232 A036145 A014950

Adjacent sequences: A057259 A057260 A057261 * A057263 A057264 A057265

Keyword

nonn

Author

Robert G. Wilson v, Sep 21 2000

Status

approved