Traducción de palabras de un lenguaje desconocido

Tome una cadena de caracteres en algún lenguaje.

In[1]:=

string = "Danke";

Identifique el lenguaje de esta palabra.

In[2]:=

origin = LanguageIdentify[string]

Out[2]=

Traduzca a otro lenguaje.

In[3]:=

WordTranslation[string, origin -> Entity["Language", "Spanish"]]

Out[3]=

Tome una lista de lenguajes y construya una nube de palabras con las palabras que aparezcan en múltiples traducciones que dicha palabra tenga.

In[4]:=

langs = {Entity["Language", "Spanish"], Entity["Language", "English"], Entity["Language", "Russian"], Entity["Language", "Danish"], Entity["Language", "Korean"]}; Manipulate[ WordCloud[ Flatten[TextWords /@ WordTranslation[string, LanguageIdentify[string] -> language]], ImageSize -> {512, 256}], {language, langs}]

Reproducir

Detener