OFFSET
1,2
COMMENTS
a(n) = MIN{e: floor(A096884(e)/10^k) = n for some k;
a(n) <= a(10*n + d), 0 <= d < 10.
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..7777
EXAMPLE
PROG
(Haskell)
import Data.List (isPrefixOf)
a185817 n = pref101pow 0 1 where
pref101pow e pow101 = if isPrefixOf (show n) (show pow101)
then e
else pref101pow (e + 1) (101 * pow101)
CROSSREFS
KEYWORD
AUTHOR
Reinhard Zumkeller, Feb 07 2011
STATUS
approved