login
A057298
Numbers n such that n | 7^n + 6^n + 1.
0
1, 2, 7, 35, 49, 86, 343, 539, 1309, 1715, 2195, 2401, 3698, 3941, 4753, 5047, 6077, 8869, 9374, 16807, 84035, 117649, 121079, 131219, 159014, 227642, 235426, 276115, 446299, 823543, 991613
OFFSET
1,2
MATHEMATICA
Select[ Range[ 10^6 ], Mod[ PowerMod[ 7, #, # ] + PowerMod[ 6, #, # ] + 1, # ] == 0 & ]
CROSSREFS
Sequence in context: A342411 A231580 A182408 * A058941 A287327 A020066
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Sep 22 2000
STATUS
approved