The Donomen naming system

Staff Picks
,
1
Open in Wolfram Cloud ↗

DOWNLOAD-DESKTOP-NOTEBOOK.nb (49.7 KB)

5 Likes
2

If we drop the last consonant and replace “z” with “s” and “w” with “v” (because, they are easily “confused” too) then we can convert to Koremutake those Donomens:

ResourceFunction["KoremutakeConvert"][
   StringReplace[
    ToLowerCase@StringTake[#, {1, -2}], {"z" -> "s", "w" -> "v"}]] & /@ {"DIHAVEJIG", "NUGIBUBAD", "MOKOMEMUL", "VIHUBOMEK", "HIZOJODOF", "JIKUTEBAK", "DUGOFUFIW", "FAZIWATOS", 
  "PULERIBOZ", "NIMUSINOM", "SAZAFOHOD", "ZATAGABED", "SAFEGEVAJ", 
  "KEMEFEFOJ", "WINEJEZUL", "WASISOBOR", "SETEROZIP", "ROBABIZIG", 
  "MAFEZOWUF", "NOTAWITOB"}

Out[8]= {17181344, 121963008, 107600052, 180814257, 55758985,
67774336, 21317646, 26389073, 134930947, 118302009, 152176539,
152275201, 151210452, 78399119, 181260236, 177382787, 154395338,
144703818, 100885976, 120826705}

Moreover, “donome” itself is also convertible to Koremutake:

In[10]:= ResourceFunction["KoremutakeConvert"]["Donome"]

Out[10]= 154801
3 Likes
3

news-congrads-kkluyshnik-02-04-19.jpg – you have earned Featured Contributor Badge 2015-11-02_10-07-11.png
Your exceptional post has been selected for our editorial column Staff Picks http://wolfr.am/StaffPicks and Your Profile is now distinguished by a Featured Contributor Badge and is displayed on the Featured Contributor Board. Thank you!