Fréquence des mots au fil du temps
La version 11 introduit WordFrequencyData pour obtenir des informations sur les fréquences de mots à partir de textes publiés en plusieurs langues. Utilisez cette nouvelle fonction pour suivre les tendances dans l'usage des mots à travers le temps.
Comparez l'utilisation des noms de deux formats vidéo entre les années 1960 et 2000.
In[1]:=
![Click for copyable input](assets.fr/word-frequency-over-time/In_75.png)
videoFormats = {"VHS", "BETAMAX"};
freqvideoFormats =
WordFrequencyData[videoFormats, "TimeSeries", {1960, 2000},
IgnoreCase -> True];
In[2]:=
![Click for copyable input](assets.fr/word-frequency-over-time/In_76.png)
DateListPlot[freqvideoFormats, Filling -> Axis]
Out[2]=
![](assets.fr/word-frequency-over-time/O_53.png)
Comparez l'utilisation des noms de ces modes de transport durant deux siècles.
In[3]:=
![Click for copyable input](assets.fr/word-frequency-over-time/In_77.png)
transports = {"bus", "bicycle", "car", "train", "plane"};
freqtransports =
WordFrequencyData[transports, "TimeSeries", {1800, 2000},
IgnoreCase -> True];
In[4]:=
![Click for copyable input](assets.fr/word-frequency-over-time/In_78.png)
DateListPlot[freqtransports, Filling -> Axis]
Out[4]=
![](assets.fr/word-frequency-over-time/O_54.png)
Découvrez quand le stylo est devenu plus puissant que l'épée.
In[5]:=
![Click for copyable input](assets.fr/word-frequency-over-time/In_79.png)
DateListPlot[
WordFrequencyData[{"sword", "pen"}, "TimeSeries", {1700, 2000},
IgnoreCase -> True], Filling -> Axis]
Out[5]=
![](assets.fr/word-frequency-over-time/O_55.png)
Réduisez la période de temps pour savoir quand l'épée a commencé à faire son retour.
In[6]:=
![Click for copyable input](assets.fr/word-frequency-over-time/In_80.png)
DateListPlot[
WordFrequencyData[{"sword", "pen"}, "TimeSeries", {1950, 2000},
IgnoreCase -> True], Filling -> Axis]
Out[6]=
![](assets.fr/word-frequency-over-time/O_56.png)