A048596 - OEIS

A048596

Numbers k such that (k mod (sum of decimal digits of k)) divides k.

11, 13, 15, 16, 17, 22, 26, 32, 33, 39, 41, 43, 44, 51, 55, 56, 64, 66, 75, 77, 78, 82, 86, 88, 91, 92, 96, 97, 99, 101, 104, 105, 106, 116, 121, 122, 123, 125, 130, 131, 138, 141, 142, 145, 147, 155, 157, 161, 168, 170, 172, 174, 176, 178, 181, 183, 184, 186, 187

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

Robert Israel, Table of n, a(n) for n = 1..10000

MAPLE

filter:= proc(n) local s, t;

s:= convert(convert(n, base, 10), `+`);

t:= n mod s;

(t <> 0) and (n mod t = 0)

end proc:

select(filter, [$1..200]); # Robert Israel, Jul 19 2023