|
Search: id:A056741
|
|
|
| A056741 |
|
Numbers n such that n | 5^n + 4^n + 3^n + 2^n + 1^n. |
|
+0
1
|
|
| 1, 3, 5, 9, 15, 25, 27, 45, 75, 81, 125, 135, 225, 243, 261, 295, 375, 405, 625, 675, 729, 925, 1125, 1215, 1875, 2025, 2187, 3125, 3375, 3645, 4077, 4833, 5139, 5625, 6075, 6345, 6561, 9375, 10125, 10935, 15625, 16875, 17895, 18125, 18225, 18495, 19683
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MATHEMATICA
|
Do[ If[ Mod[ 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. A001552.
Sequence in context: A045604 A057251 A015965 this_sequence A057235 A057289 A056754
Adjacent sequences: A056738 A056739 A056740 this_sequence A056742 A056743 A056744
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 25 2000
|
|
|
Search completed in 0.002 seconds
|
