|
%I #4 Oct 15 2013 22:31:25
%S 1,10,10,10,10,10,10,10,10,0,11111111111,1100,111,32,30,24,23,22,21,0,
%T 111111111111111111111,10110,212,120,100,42,36,34,32,0,
%U 1111111111111111111111111111111,100000,1020,202,120,100,52,46,43,0
%N n written in base Mod[n,10].
%e In base 1, n =11...11=n written n times; in base 0 baseform is taken as 0.
%t Table[BaseForm[w, Mod[w, 10]], {w, 1, 128}]
%Y Cf. A008713, A072804-A072807.
%K base,nonn
%O 1,2
%A _Labos Elemer_, Jul 12 2002
|
