A371030 - OEIS

%I #25 Mar 28 2024 23:44:34

%S 0,1,2,3,10,11,12,13,20,21,22,23,30,31,32,33,40,41,42,43,50,51,52,53,

%T 100,101,102,103,110,111,112,113,120,121,122,123,130,131,132,133,140,

%U 141,142,143,150,151,152,153,200,201,202,203,210,211,212,213

%N n written in compositorial base.

%C Compositorial base is a mixed-radix representation using the composite numbers (A002808) from least to most significant.

%C Places reading from right have values (1, 4, 24, 192, ...) = compositorial numbers (A036691).

%C a(n) = concatenation of decimal digits of n in compositorial base. This concatenated representation is unsatisfactory for large n (above 172799), when coefficients of 10 or greater start to appear.

%e a(35)=123; 35 = 1*24 + 2*4 + 3*1.

%t Table[FromDigits@ IntegerDigits[n,MixedRadix[Reverse@ ResourceFunction["Composite"]@ Range@ 8]], {n, 0,55}]

%Y Cf. A002808, A036691, A049345.

%K nonn,base,less

%O 0,3

%A _James C. McMahon_, Mar 08 2024