A347410 Numbers with property that when divided by the sum of their digits the quotient and remainder are the same.

16, 39, 55, 96, 187

Offset

1,1

Links

Table of n, a(n) for n=1..5.

Rene Morningstar, Quora blog post #1626147897, Aug 15 2021. Joe Zbiciak and several others gave a proof that the sequence is complete.

Mathematica

Select[Range[200000], Differences[QuotientRemainder[#, Total[ IntegerDigits[ #]]]] == {0}&]

Crossrefs

Sequence in context: A308311 A121375 A342976 * A253152 A305362 A197603

Adjacent sequences: A347407 A347408 A347409 * A347411 A347412 A347413

Keyword

nonn,fini,full,base

Author

Harvey P. Dale, Aug 30 2021

Status

approved