OFFSET
0,2
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 0..4095 (4095 = 8^4 - 1)
PROG
(Haskell)
a055118 0 = 0
a055118 n = if d == 0 then 8 * a055118 n' else 8 * a055118 n' + 8 - d
where (n', d) = divMod n 8
-- Reinhard Zumkeller, Mar 12 2014
CROSSREFS
KEYWORD
AUTHOR
Henry Bottomley, Apr 19 2000
STATUS
approved