A092599 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

Other ways to Give

A092599

Number of those natural numbers x for which sum of decimal digits exceeds x/n.

0, 10, 17, 25, 40, 58, 70, 81, 88, 90, 109, 122, 131, 141, 150, 160, 173, 187, 194, 213, 227, 239, 254, 268, 282, 297, 314, 325, 346, 364, 381, 400, 419, 435, 459, 477, 492, 520, 542, 564, 589, 609, 630, 652, 673, 686, 712, 729, 746, 760, 780, 795, 809, 822

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

LINKS

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

EXAMPLE

For n=2,3,4 the relevant 10,17,25 natural numbers are listed. For n=1 at condition sumdigit[x]>x no solutions, while at sumdigit[x]>=x 9 solutions exists. Here a[1]=0.

MATHEMATICA

Table[{t=Table[0, {3000}], j=1, el=0}; Do[el=0; s=Apply[Plus, IntegerDigits[n]]; If[Greater[s, n/k], t[[j]]=n; j=j+1], {n, 1, 10000}]; {t; el=Length[Union[t]]-1, Max[t]; }, {k, 1, 100}]

CROSSREFS

Cf. A092596-A092600.

Sequence in context: A003333 A345803 A354472 * A127853 A267737 A188302

Adjacent sequences: A092596 A092597 A092598 * A092600 A092601 A092602

KEYWORD

base,nonn

AUTHOR

Labos Elemer, Mar 18 2004

STATUS

approved