|
Search: id:A056751
|
|
|
| A056751 |
|
Numbers n such that n | 8^n + 7^n + 6^n + 5^n + 4^n + 3^n + 2^n + 1^n. |
|
+0
1
|
|
| 1, 2, 3, 4, 6, 9, 12, 27, 34, 42, 68, 81, 84, 102, 172, 204, 243, 348, 578, 639, 714, 729, 837, 1156, 1428, 1431, 1734, 1878, 1972, 2187, 3468, 4077, 4187, 4326, 5213, 6093, 6561, 9826, 9962, 12138, 16014, 16878, 18212, 19652, 19683, 21627, 24276, 29478
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MATHEMATICA
|
Do[ If[ Mod[ PowerMod[ 8, n, n ] + PowerMod[ 7, n, n ] + 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. A001555.
Sequence in context: A111791 A057285 A057287 this_sequence A137446 A097557 A123648
Adjacent sequences: A056748 A056749 A056750 this_sequence A056752 A056753 A056754
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 25 2000
|
|
|
Search completed in 0.002 seconds
|
