Berechnungen mit mehrsprachigen Wortlisten
Vergleichen Sie die Verteilung der Anzahl von Zeichen pro Wort in unterschiedlichen Sprachen.
In[1]:=
languages = {"German", "English", "Italian", "Dutch", "Russian"};
Ermitteln Sie die Liste verfügbarer Wörter für diese Sprachen und fassen Sie diese in einer Assoziation zusammen.
In[2]:=
words = Association[# -> WordList[Language -> #] & /@ languages];
Berechnen Sie die Länge jedes dieser Wörter.
In[3]:=
wordLengths = StringLength /@ words;
Dies sind die Mindest- und Maximallängen:
In[4]:=
MinMax /@ wordLengths
Out[4]=
Visualisieren Sie überlappende Histogramme relativer Häufigkeiten in jeder Sprache. Russisch und Englisch haben einen höheren Anteil kürzerer Wörter, während Niederländisch und Deutsch deutlich längere Wörter verzeichnen.
In[5]:=
Histogram[wordLengths, Automatic, "PDF", ChartLegends -> Automatic]
Out[5]=
Kombinieren Sie Histogramme, um die absolute Wortlänge aller Sprachen zu visualisieren.
In[6]:=
Histogram[wordLengths, ChartLegends -> Automatic,
ChartLayout -> "Stacked"]
Out[6]=