随时间变化的词频
版本 11 引入了 WordFrequencyData,从多语种出版物中收集词频信息. 使用该函数跟踪词汇随时间变化的使用倾向.
比较两个音频格式名称在 1960 和 2000 年的使用.
In[1]:=
![Click for copyable input](assets.zh/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.zh/word-frequency-over-time/In_76.png)
DateListPlot[freqvideoFormats, Filling -> Axis]
Out[2]=
![](assets.zh/word-frequency-over-time/O_53.png)
比较两世纪来对以下运输方式名称的使用.
In[3]:=
![Click for copyable input](assets.zh/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.zh/word-frequency-over-time/In_78.png)
DateListPlot[freqtransports, Filling -> Axis]
Out[4]=
![](assets.zh/word-frequency-over-time/O_54.png)
探索 pen(笔)从什么时候比 sword(剑)更流行.
In[5]:=
![Click for copyable input](assets.zh/word-frequency-over-time/In_79.png)
DateListPlot[
WordFrequencyData[{"sword", "pen"}, "TimeSeries", {1700, 2000},
IgnoreCase -> True], Filling -> Axis]
Out[5]=
![](assets.zh/word-frequency-over-time/O_55.png)
使用小一些的时间段,找出 sword(剑)回归的时间.
In[6]:=
![Click for copyable input](assets.zh/word-frequency-over-time/In_80.png)
DateListPlot[
WordFrequencyData[{"sword", "pen"}, "TimeSeries", {1950, 2000},
IgnoreCase -> True], Filling -> Axis]
Out[6]=
![](assets.zh/word-frequency-over-time/O_56.png)