Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I #42 Mar 26 2021 12:43:06
%S 4,24,84672,1852200,829785600,20910597120,92215733299200,
%T 1239789303244800000,887165996513213819259682435576627200000000
%N Numbers k such that the product of the lengths of the words in the name of k in American English is equal to k.
%C This sequence uses American English spellings; e.g., 84672 ends in "six hundred seventy-two", not "six hundred and seventy-two" (cf. A006944). Also, for purposes of this sequence, hyphens are treated as spaces, so "seventy-two" is counted as two words ("seventy two"). - _Jon E. Schoenfield_, Nov 18 2018
%C a(10) > 10^138 if it exists. - _Jonathan Pappas_, Mar 12 2021
%H Jonathan Pappas, <a href="https://github.com/JonnyGamer/A058230">Python program</a>
%e 84672 = "eighty four thousand six hundred seventy two" = 6*4*8*3*7*7*3 = 84672.
%t Select[Range[10^5],Times@@StringLength/@StringSplit[StringReplace[#~IntegerName~"Words",{","->"","-"->" "}]]==#&] (* _Giorgos Kalogeropoulos_, Mar 20 2021 *)
%o (Python)
%o # See Python program link.
%o # _Jonathan Pappas_, Mar 12 2021
%K dumb,nonn,word
%O 1,1
%A _Michael Kleber_, Dec 01 2000
%E a(7)-a(9) from _Jonathan Pappas_, Mar 12 2021