OFFSET
0,3
COMMENTS
A138472(a(n)) = 0. - Reinhard Zumkeller, Mar 19 2008
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 0..10000
PROG
(Haskell)
a067043 n = a067043_list !! n
a067043_list = 0 : f 1 1 0 1 where
f k x y z
| y > 0 = (x-y) : f k x (y `div` 10) z
| k < 9 = x : f (k+1) (2*x-k*z+1) (z `div` 10) z
| otherwise = x : f 1 (20*z-1) z (10*z)
-- Reinhard Zumkeller, Jul 10 2011
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Feb 17 2002
STATUS
approved