|
Search: id:A056745
|
|
|
| A056745 |
|
Numbers n such that n | 6^n + 5^n + 4^n + 3^n + 2^n + 1^n. |
|
+0
2
|
|
| 1, 3, 7, 9, 21, 27, 49, 63, 77, 81, 147, 189, 243, 297, 343, 369, 441, 567, 729, 903, 1029, 1323, 1617, 1631, 1701, 2009, 2037, 2043, 2187, 2401, 2597, 2709, 3087, 3969, 5103, 6237, 6321, 6561, 7203, 8001, 8127, 9261, 10209, 11907, 13203, 15309, 15477
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MATHEMATICA
|
Do[ If[ Mod[ PowerMod[ 6, n, n ] + PowerMod[ 5, n, n ] + PowerMod[ 4, n, n ] + PowerMod[ 3, n, n ] + PowerMod[ 2, n, n ] + 1, n ] == 0, Print[ n ] ], {n, 1, 10^6} ]
|
|
CROSSREFS
|
Cf. A001553.
Sequence in context: A057233 A125227 A057286 this_sequence A057263 A057493 A003594
Adjacent sequences: A056742 A056743 A056744 this_sequence A056746 A056747 A056748
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 25 2000
|
|
|
Search completed in 0.002 seconds
|
