OFFSET
1,1
COMMENTS
LINKS
E. Angelini, Knife numbers.
PROG
(PARI) is(n)=n&&for(k=1, #Str(n)-1, n%([1, 1]*divrem(n, 10^k))||return(1))
CROSSREFS
KEYWORD
nonn,base
AUTHOR
M. F. Hasler and Eric Angelini, Sep 21 2014
STATUS
approved