A138166 Numbers containing their length in their decimal representation.

1, 12, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 32, 42, 52, 62, 72, 82, 92, 103, 113, 123, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 143, 153, 163, 173, 183, 193, 203, 213, 223, 230, 231, 232, 233, 234, 235, 236, 237, 238, 239, 243, 253, 263, 273, 283

Offset: 1

Author

Reinhard Zumkeller, Mar 03 2008

Keywords

• nonn
• base

Links

• R. Zumkeller, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A055642, A138167, A138168.

Cf. A038528 (subsequence).

Cf. A052018, A119246.

Programs

Haskell

import Data.List (isInfixOf)
a138166 n = a138166_list !! (n-1)
a138166_list = filter (\x -> show (a055642 x) `isInfixOf` show x) [0..]
-- Reinhard Zumkeller, Jul 04 2012