A341190 Numbers that when divided by the sum of their digits leave 20 as remainder.

779, 986, 2849, 2995, 3298, 3496, 3677, 3694, 3884, 3892, 3895, 4288, 4298, 4486, 4684, 4778, 4795, 4882, 4919, 4979, 5278, 5476, 5674, 5695, 5747, 5788, 5872, 5948, 5954, 6268, 6368, 6466, 6575, 6595, 6664, 6782, 6796, 6862, 6884, 7196, 7258, 7456

Offset

1,1

Links

Paolo Xausa, Table of n, a(n) for n = 1..10000 (terms 1..5001 from Carole Dubois).

Example

a(1) = 779 and 779 is 23*33 with remainder 20;
a(2) = 986 and 986 is 23*42 with remainder 20; etc.

Mathematica

A341190Q[k_] := Mod[k, Total[IntegerDigits[k]]] == 20;
Select[Range[8000], A341190Q] (* Paolo Xausa, Dec 02 2025 *)

Crossrefs

Cf. A005349 (Niven numbers: remainder = 0), A209871 (Quasi-Niven numbers: remainder = 1), A341169 to A341182 (remainders = 2 to 15).

Sequence in context: A231062 A200559 A231252 * A147547 A259924 A135198

Adjacent sequences: A341187 A341188 A341189 * A341191 A341192 A341193

Keyword

base,nonn

Author

Eric Angelini and Carole Dubois, Feb 06 2021

Status

approved