OFFSET
1,2
COMMENTS
Numbers not divisible by at least one of 9, 17, 25, ...
LINKS
Jianing Song, Table of n, a(n) for n = 1..10000
EXAMPLE
7 is a term since it has no divisor congruent to 1 modulo 8 other than 1.
MATHEMATICA
Select[Range[100], NoneTrue[Rest[Divisors[#]], Mod[#, 8]==1&]&] (* Harvey P. Dale, Jun 01 2022 *)
PROG
(PARI) res(n, a, b) = sumdiv(n, d, (d%a) == b)
isA343107(n) = (res(n, 8, 1) == 1)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Jianing Song, Apr 05 2021
STATUS
approved