login
A341170
Numbers that when divided by the sum of their digits leave 3 as remainder.
1
15, 23, 31, 33, 35, 39, 47, 51, 52, 59, 73, 75, 78, 94, 103, 105, 107, 113, 115, 123, 141, 146, 147, 163, 168, 183, 185, 203, 211, 213, 219, 231, 241, 245, 251, 253, 255, 258, 259, 291, 303, 304, 321, 323, 327, 328, 343, 344, 348, 363, 377, 393, 411, 430, 433, 435, 437, 438, 443, 445
OFFSET
1,1
LINKS
EXAMPLE
a(1) = 15 and 15 is 6*2 with remainder 3;
a(2) = 23 and 23 is 5*4 with remainder 3; etc.
MATHEMATICA
Select[Range[500], Mod[#, Total[IntegerDigits[#]]]==3&] (* Harvey P. Dale, May 27 2021 *)
CROSSREFS
Cf. A005349 (Niven numbers: remainder = 0), A209871 (Quasi-Niven numbers: remainder = 1), A341169 to A341182 (remainders = 2 to 15).
Sequence in context: A371894 A325823 A129387 * A171167 A242412 A364729
KEYWORD
nonn,base
AUTHOR
Eric Angelini and Carole Dubois, Feb 06 2021
STATUS
approved