|
| |
|
|
A056645
|
|
Numbers n such that n | 3^n + 2^n + 1^n.
|
|
0
| |
|
|
1, 2, 3, 9, 14, 27, 81, 98, 99, 153, 243, 621, 686, 729, 1199, 2187, 4018, 4802, 5049, 6561, 8019, 12393, 19683, 20541, 31509, 33614, 59049, 70389, 82377, 113974, 150903, 177147, 226557, 235298, 299619, 308014, 340443, 408969, 423929, 531441
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
MATHEMATICA
| Do[ If[ Mod[ PowerMod[ 3, n, n ] + PowerMod[ 2, n, n ] + 1, n ] == 0, Print[ n ] ], {n, 1, 10^6} ]
|
|
|
CROSSREFS
| Cf. A001550.
Sequence in context: A048038 A113501 A101067 * A047171 A094557 A026307
Adjacent sequences: A056642 A056643 A056644 * A056646 A056647 A056648
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 25 2000
|
| |
|
|