cp's OEIS Frontend

A043543 Number of distinct base-16 digits of n.

%I A043543 #15 Jul 09 2023 02:22:45
%S A043543 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,
%T A043543 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,
%U A043543 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,2,2,2,2,2
%N A043543 Number of distinct base-16 digits of n.
%C A043543 The first 1, 2, 3, 4,.. occur at n = 1, 16 (10_16), 258 (102_16), 4131 (1023_16), 66100 (10234_16), 1057605 (102345_16). Obviously numbers >16 appear never, so this list of records is finite. - _R. J. Mathar_, Jul 08 2023
%p A043543 A043543 := proc(n)
%p A043543     convert(convert(n,base,16),set) ;
%p A043543     nops(%) ;
%p A043543 end proc: # _R. J. Mathar_, Jul 08 2023
%t A043543 Table[Length[Union[IntegerDigits[n,16]]],{n,90}] (* _Harvey P. Dale_, Jul 23 2013 *)
%Y A043543 Differs from A297784.
%K A043543 nonn,base
%O A043543 1,16
%A A043543 _Clark Kimberling_