login
A057829
Numbers n such that n | 5^n + 3^n +1.
0
1, 3, 9, 27, 51, 81, 243, 279, 729, 2187, 4131, 4947, 6561, 19683, 21213, 22599, 23571, 48357, 59049, 104733, 177147, 184419, 220887, 334611, 531441, 640791, 808461
OFFSET
1,2
MATHEMATICA
Select[ Range[ 10^6 ], Mod[ PowerMod[ 5, #, # ] + PowerMod[ 3, #, # ] + 1, # ] == 0 & ]
CROSSREFS
Sequence in context: A337948 A163791 A248078 * A181047 A014948 A093665
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Nov 08 2000
STATUS
approved