OFFSET
0,3
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..1000
MAPLE
a:= proc(n) local i, m, r ; m:=n; r:=0;
for i from 0 while m>0 do
r:= r +100^i*irem(m, 16, 'm')
od; r
end:
seq(a(n), n=0..60); # Alois P. Heinz, Jun 23 2014
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Henry Bottomley, Jun 06 2000
STATUS
approved