login
A057302
Numbers n such that n | 5^n + 4^n + 1.
0
1, 2, 5, 6, 14, 25, 98, 114, 125, 415, 425, 625, 686, 1038, 1825, 2166, 2875, 3125, 3625, 3775, 4802, 6625, 15625, 18875, 25878, 28714, 32242, 33614, 41154, 49075, 60625, 78125, 90775, 94375, 96031, 132398, 173875, 235298, 259375, 265625
OFFSET
1,2
MATHEMATICA
Select[ Range[ 10^6 ], Mod[ PowerMod[ 5, #, # ] + PowerMod[ 4, #, # ] + 1, # ] == 0 & ]
CROSSREFS
Sequence in context: A000092 A100630 A275839 * A237352 A109784 A221472
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Sep 22 2000
STATUS
approved