OFFSET
0,3
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..10000
EXAMPLE
a(15)=15 since it is represented by the digit "15" base 16. a(21)=15 since it is represented by the digit "1" followed by the digit "5" base 16.
MAPLE
a:= proc(n) local i, m, r ; m:=n; r:=NULL;
if n=0 then return 0 fi;
for i from 0 while m>0 do
r:= irem(m, 16, 'm'), r
od; parse(cat(r))
end:
seq(a(n), n=0..80); # Alois P. Heinz, Jun 23 2014
MATHEMATICA
f[n_] := FromDigits@ Flatten@ IntegerDigits@ IntegerDigits[n, 16]; Array[f, 66, 0] (* Robert G. Wilson v, Jun 23 2014 *)
CROSSREFS
KEYWORD
base,dumb,easy,nonn
AUTHOR
Henry Bottomley, Oct 13 2000
STATUS
approved