OFFSET
1,2
COMMENTS
Contains A003595. The first term not in A003595 is 301. Is 1 the only term not divisible by 5 or 7? - Robert Israel, Feb 22 2017
No term is divisible by 3. 5 and 7 are the only primes in this sequence. - Altug Alkan, Feb 23 2017
MAPLE
select(t -> add(i &^ t, i=2..8) mod t = 0, [$1..10^6]); # Robert Israel, Feb 22 2017
MATHEMATICA
Select[ Range[ 10^5 ], Mod[ PowerMod[ 8, #, # ] + PowerMod[ 7, #, # ] + PowerMod[ 6, #, # ] + PowerMod[ 5, #, # ] + PowerMod[ 4, #, # ] + PowerMod[ 3, #, # ] + PowerMod[ 2, #, # ], # ] == 0 & ]
Select[Range[100000], Mod[Total[PowerMod[Range[2, 8], #, #]], #]==0&] (* Harvey P. Dale, Jul 28 2021 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Sep 22 2000
STATUS
approved