|
| |
|
|
A061276
|
|
Numbers which are sums of repdigits of their digits.
|
|
2
| |
|
|
0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 197, 198, 199, 285, 373, 461, 554, 1098, 1099, 1185, 1186, 1187, 1276, 1278, 1365, 1366, 1453, 1454, 1458, 1459, 1543, 2176, 2261, 2263, 2354, 2357, 2359, 2532, 2621, 2623, 2996, 2997, 2999, 3254, 3259, 3340, 3341, 3342, 3343
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
LINKS
| T. D. Noe, Table of n, a(n) for n = 1..7474 (numbers < 1000000)
Moshe Levin, Table of n, a(n) with corresponding repdigits, for n=1..1000
|
|
|
EXAMPLE
| 1185 = 1111 + 11 + 8 + 55
|
|
|
MATHEMATICA
| okQ[n_] := Module[{d, len, ones, lst}, d = IntegerDigits[n]; len = Length[d]; ones = Table[(10^i - 1)/9, {i, len}]; lst = d[[1]]*ones; Do[lst = Union[Flatten[Outer[Plus, lst, d[[i]]*ones]]], {i, 2, len}]; MemberQ[lst, n]]; Select[Range[0, 4000], okQ] (* T. D. Noe, Dec 09 2011 *)
|
|
|
CROSSREFS
| Cf. A131366.
Sequence in context: A032569 A039723 A002998 * A137667 A117954 A029966
Adjacent sequences: A061273 A061274 A061275 * A061277 A061278 A061279
|
|
|
KEYWORD
| base,easy,nice,nonn
|
|
|
AUTHOR
| Erich Friedman (efriedma(AT)stetson.edu), Jun 02 2001
|
| |
|
|
