A356726 Integers which have in Roman numerals more distinct symbols than any smaller number.
1, 4, 14, 44, 144, 444, 1444
Offset: 1
Examples
For n = 3, a(3) = 14 because 14 = XIV which is the smallest number with 3 symbols in Roman notation.
Programs
-
Mathematica
kmax=1500; a={}; n=1; For[k=1, k<=kmax, k++, If[Length[DeleteDuplicates[Characters[RomanNumeral[k]]]] == n, AppendTo[a, k]; n++; k=1]]; a (* Stefano Spezia, Aug 26 2022 *)
Comments