A309750 Number of letters in the English names of the months when the names are arranged in alphabetical order.
4, 5, 6, 3, 3, 5, 3, 5, 4, 6, 3, 4
Offset: 1
Programs
-
Mathematica
Sort[Array[{DateValue[#, "MonthName"], StringLength@ IntegerName@ DateValue[#, "Month"]} &@ DateObject[{1, #, 1}] &, 12]][[All, -1]] (* Michael De Vlieger, Sep 04 2019 *)
Comments