login
A057238
Numbers n such that n | 4^n + 3^n + 2^n.
0
1, 3, 9, 27, 33, 81, 143, 243, 729, 2187, 2673, 4779, 6561, 8613, 9713, 19683, 30393, 55647, 59049, 79257, 94113, 162081, 177147, 216513, 225837, 281961, 531441, 1033803, 1594323, 2318147, 3053781, 4337031, 4782969, 6042681
OFFSET
1,2
MATHEMATICA
Select[ Range[ 1, 10^7, 2 ], Mod[ PowerMod[ 4, #, # ] + PowerMod[ 3, #, # ] + PowerMod[ 2, #, # ], # ] == 0 & ]
CROSSREFS
Sequence in context: A095309 A191126 A161141 * A070364 A070363 A305617
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Sep 20 2000
STATUS
approved