OFFSET
0,6
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 0..10000
PROG
(PARI) a(n) = if(n<2, n, if(n%2==0, a(n/2), a((n-1)/2)+a((n-3)/2)))
(Haskell)
a082498 n = a082498_list !! n
a082498_list = 0 : 1 : concat
(zipWith (\u v -> [u, u + v]) (tail a082498_list) a082498_list)
-- Reinhard Zumkeller, Jul 19 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Ralf Stephan, Apr 29 2003
STATUS
approved