login
A261794
a(n) is the smallest nonzero number that is not a substring of n in decimal representation.
4
1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 3, 2, 2, 2, 2, 2, 2, 2, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1
OFFSET
0,2
COMMENTS
A261795(n) = a(A261793(n)).
LINKS
PROG
(Haskell)
import Data.List (isInfixOf)
a261794 x = f $ tail a031298_tabf where
f (cs:css) = if isInfixOf cs (a031298_row x)
then f css else foldr (\d v -> 10 * v + d) 0 cs
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Sep 01 2015
EXTENSIONS
Name corrected by Álvar Ibeas, Sep 08 2020
STATUS
approved