OFFSET
1,2
LINKS
Robert Israel, Table of n, a(n) for n = 1..238
MAPLE
select(n -> 6 &^ n + 7 &^ n + 8 &^ n) mod n = 0, [$1..10^5]); # Robert Israel, Jan 30 2020
MATHEMATICA
Select[ Range[ 10^6 ], Mod[ PowerMod[ 8, #, # ] + PowerMod[ 7, #, # ] + PowerMod[ 6, #, # ], # ] == 0 & ]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Sep 20 2000
STATUS
approved