login
A138166
Numbers containing their length in their decimal representation.
6
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,2
LINKS
PROG
(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
CROSSREFS
Cf. A038528 (subsequence).
Sequence in context: A360529 A093314 A175765 * A208273 A046418 A171795
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Mar 03 2008
STATUS
approved