|
Search: id:A092600
|
|
|
| A092600 |
|
Largest natural number x=a[n] for which sum of decimal digits exceeds x/n; for n=1, the case when no such number exists, a[1]=0 was taken arbitrarily. |
|
+0
5
|
|
| 0, 19, 29, 49, 79, 99, 99, 99, 99, 99, 199, 199, 199, 199, 299, 299, 299, 299, 299, 399, 399, 399, 499, 499, 499, 499, 599, 599, 599, 699, 699, 799, 799, 799, 899, 899, 899, 999, 999, 999, 999, 999, 999, 999, 999, 999, 999, 999, 999, 999, 999, 999, 999, 999
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
EXAMPLE
|
At n=10 a[10]=99 since 9+9=18>99/10=9.9; at n=11 a[11]=199 since 1+9+9=19>199/11=18.09.
|
|
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; Max[t]}, {k, 1, 100}]
|
|
CROSSREFS
|
Cf. A092596-A092600.
Adjacent sequences: A092597 A092598 A092599 this_sequence A092601 A092602 A092603
Sequence in context: A046120 A063644 A156782 this_sequence A050266 A100590 A106124
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), Mar 18 2004
|
|
|
Search completed in 0.002 seconds
|
