A058230 Numbers k such that the product of the lengths of the words in the name of k in American English is equal to k.
4, 24, 84672, 1852200, 829785600, 20910597120, 92215733299200, 1239789303244800000, 887165996513213819259682435576627200000000
Offset: 1
Examples
84672 = "eighty four thousand six hundred seventy two" = 6*4*8*3*7*7*3 = 84672.
Links
- Jonathan Pappas, Python program
Programs
-
Mathematica
Select[Range[10^5],Times@@StringLength/@StringSplit[StringReplace[#~IntegerName~"Words",{","->"","-"->" "}]]==#&] (* Giorgos Kalogeropoulos, Mar 20 2021 *)
-
Python
# See Python program link. # Jonathan Pappas, Mar 12 2021
Extensions
a(7)-a(9) from Jonathan Pappas, Mar 12 2021
Comments