login
A056645
Numbers n such that n | 3^n + 2^n + 1^n.
1
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
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 * A295857 A047171 A094557
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Aug 25 2000
STATUS
approved