OFFSET
1,2
COMMENTS
The only primes in the sequence are 2 and 13. Are all terms except 1 divisible by 2 or 13? - Robert Israel, Feb 06 2018
MAPLE
select(n -> 10 &^ n + 9 &^ n + 8 &^ n + 7 &^ n + 6 &^ n + 5 &^ n + 4 &^ n + 3 &^ n mod n = 0 , [$1..10^6]); # Robert Israel, Feb 06 2018
MATHEMATICA
Select[ Range[ 10^6 ], Mod[ PowerMod[ 10, #, # ] + PowerMod[ 9, #, # ] + PowerMod[ 8, #, # ] + PowerMod[ 7, #, # ] + PowerMod[ 6, #, # ] + PowerMod[ 5, #, # ] + PowerMod[ 4, #, # ] + PowerMod[ 3, #, # ], # ] == 0 & ]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Sep 22 2000
EXTENSIONS
More terms from Robert Israel, Feb 06 2018
STATUS
approved