|
|
A347410
|
|
Numbers with property that when divided by the sum of their digits the quotient and remainder are the same.
|
|
0
|
|
|
|
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
|
|
|
|