Traduza palavras de um idioma desconhecido

Pegue uma cadeia de caracteres de algum idioma.

In[1]:=

string = "Danke";

Identifique o idioma desta palavra.

In[2]:=

origin = LanguageIdentify[string]

Out[2]=

Traduza para outro idioma.

In[3]:=

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

Out[3]=

Pegue uma lista de idiomas e construa uma nuvem de palavras com as palavras que aparecem nas várias traduções que esta palavra tem.

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}]

Reproduzir

Parar