35 自然语言理解
词汇表
| 函数 | 说明 |
|---|---|
Interpreter["type"] |
指定一个解释自然语言的函数 |
TextCases["text","type"] |
在文本中查找给定类型的实例 |
TextStructure["text"] |
查找文本的语法结构 |
WordTranslation["word","language"] |
将单词翻译为另一语言 |
回顾
在真实世界数据一章中,介绍了如何使用 ctrl+= 来输入自然语言。
现在介绍如何设置能够理解自然语言的函数。
Interpreter 是关键。
解释器函数
告诉 Interpreter 想要得到的类型,它会尝试将任意字符串按该类型进行解释。
颜色
将字符串 "hot pink" 解释为颜色:
wl
In[]:=Interpreter["Color"]["hot pink"]

货币
Interpreter 将自然语言转换为可计算的 Wolfram 语言 表达式。
下面是一个涉及货币金额的示例。
解释各种货币金额:
wl
In[]:=Interpreter["CurrencyAmount"][{"4.25 dollars", "85 cents", "3400 rupees", "5 euros"}]

使用当前汇率计算总额:
wl
In[]:=Total[{Quantity[4.25, "USDollars"], Quantity[85, "USCents"], Quantity[3400, "IndianRupees"], Quantity[5, "Euros"]}]

地理
城市
示例:将字符串 nyc 解释为城市
wl
In[]:=Interpreter["City"]["nyc"]

Big Apple 是纽约市的别名,返回值相同:
wl
In[]:=Interpreter["City"]["the big apple"]
位置
Interpreter 给出白宫的地理位置:
wl
In[]:=Interpreter["Location"]["White House"]
Out[]=GeoPosition[{38.8977, -77.0366}]
也可以从街道地址解析:
wl
In[]:=Interpreter["Location"]["1600 Pennsylvania Avenue, Washington, DC"]
Out[]=GeoPosition[{38.8977, -77.0366}]
其他
Interpreter 支持数百种对象类型。
大学
解释大学名称(U of I 对应哪个大学取决于地理位置):
wl
In[]:=Interpreter["University"][{"Harvard", "Stanford", "U of I"}]

化学品
解释化学品名称:
wl
In[]:=Interpreter["Chemical"][{"H2O", "aspirin", "CO2", "wolfram"}]

动物
解释动物名称并获取它们的图像:
wl
In[]:=EntityValue[Interpreter["Animal"][{"cheetah", "tiger", "elephant"}], "Image"]

文本选择
Interpreter 解释完整字符串。
TextCases 则尝试从字符串中挑出你请求的实例。
提取文本中的名词:
wl
In[]:=TextCases["A sentence is a linguistic construct", "Noun"]
Out[]={"sentence", "construct"}
提取货币金额:
wl
In[]:=TextCases["Choose between $5, €5 and ¥5000", "CurrencyAmount"]
Out[]={"$5", "€5", "¥5000"}
你可以使用 TextCases 从文本中挑出特定类型的实体。
下面示例从维基百科文章中挑出国家名并生成词云。
从当前关于旅游的维基百科文章生成国家名称词云:
wl
In[:=WordCloud[TextCases[WikipediaData["tourism"], "Country"]]

文本结构
TextStructure 显示文本的整体结构。
将一句英语句子解析为语法单元:
wl
In[]:=TextStructure["You can do so much with the Wolfram Language."]

另一种表示,作为图:
wl
In[]:=TextStructure["You can do so much with the Wolfram Language.", "ConstituentGraphs"]

特定词类列表
WordList[] 给出常用词列表。
WordList["Noun"] 等返回特定词类列表。
列出前 20 个常见动词:
wl
In[]:=Take[WordList["Verb"], 20]
Out[]={aah,abandon,abase,abash,abate,abbreviate,abdicate,abduct,abet,abhor,abide,abjure,ablate,abnegate,abolish,abominate,abort,abound,abrade,abridge}
单词属性
可以研究单词属性。
下面比较名词、动词和形容词长度分布的直方图。
wl
In[]:=Histogram[StringLength[WordList[#]]] & /@ {"Noun", "Verb", "Adjective"}

单词翻译
Wolfram 语言 不仅支持英语。
WordTranslation 提供单词翻译。
将 hello 翻译为法语:
wl
In[]:=WordTranslation["hello", "French"]
Out[]={bonjour, hello, holà, ohé}
翻译为韩语:
wl
In[]:=WordTranslation["hello", "Korean"]
Out[]={여보세요, 안녕하세요}
翻译为韩语并转写为拉丁字母:
wl
In[]:=Transliterate[WordTranslation["hello", "Korean"]]
Out[]={yeoboseyo, annyeonghaseyo}
若比较多种语言,可传 All 给 WordTranslation。
结果为关联,按语言使用频率大致排序。
将 hello 翻译为世界上最常用的 5 种语言:
wl
In[]:=Take[WordTranslation["hello", All], 5]

取前 100 种语言,查看每种语言第一个翻译的首字符,并生成词云,显示在这些语言中表示 hello 的首字母分布:
wl
In[]:=WordCloud[Values[StringTake[First[#], 1] & /@ Take[WordTranslation["hello", All], 100]]]
