A378835 Numbers with the median of the digits equal to the digital root.

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 99, 109, 118, 128, 138, 148, 158, 168, 178, 181, 182, 183, 184, 185, 186, 187, 188, 190, 209, 218, 227, 237, 247, 257, 267, 272, 273, 274, 275, 276, 277, 281, 290, 309, 318, 327, 336, 346, 356, 363, 364, 365, 366, 372, 381, 390, 409, 418, 427, 436, 445

Offset

1,3

Links

Stefano Spezia, Table of n, a(n) for n = 1..10000

Example

10 is not in the list because the median of its digits is not integer.
11 is not in the list because the median of its digits is 1 which is not equal to 2, the digital root of 11.
109 is in the list because the median of its digits is 1 which is equal to the digital root of 109.

Mathematica

A010888[n_]:=If[n==0, 0, n - 9*Floor[(n-1)/9]]; Select[Range[0, 450], Median[IntegerDigits[#]]==A010888[#] &]

Crossrefs

Cf. A010888, A378836.

Cf. A378560, A378564, A378837, A378838.

Sequence in context: A066492 A348834 A342978 * A281091 A378837 A271569

Adjacent sequences: A378832 A378833 A378834 * A378836 A378837 A378838

Keyword

nonn,base,easy

Author

Stefano Spezia, Dec 09 2024

Status

approved