A341170 Numbers that when divided by the sum of their digits leave 3 as remainder.

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

Carole Dubois, Table of n, a(n) for n = 1..5001

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: A014312 A325823 A129387 * A171167 A242412 A364729

Adjacent sequences: A341167 A341168 A341169 * A341171 A341172 A341173

Keyword

nonn,base

Author

Eric Angelini and Carole Dubois, Feb 06 2021

Status

approved