OFFSET
1,2
COMMENTS
A dyslexic person might have trouble distinguishing this sequence from A125886!
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
PROG
(Haskell)
a125887 n = a125887_list !! (n-1)
a125887_list = 1 : f '1' (filter ((> 0) . (`mod` 10)) [11..]) where
f d zs = y : f (last $ show y) (xs ++ ys) where
(xs, y:ys) = span ((/= d) . head . show) zs
-- Reinhard Zumkeller, Jul 06 2011
CROSSREFS
KEYWORD
AUTHOR
Zak Seidov, Dec 13 2006
STATUS
approved