Wolfram 语言™

自由格式实体-属性查询

用 Interpreter 构建与 EntityValue 类似的函数，但允许 EntityType、 Entity 和 EntityProperty 的自由语言描述.

In[1]:=

NLEntityValue[type_String, entity_String, property_String] := With[{res = Map[{Replace[#, AmbiguityList[{a___}, ___] :> a]} &, Interpreter[ CompoundElement[{"EntityType", "Entity", "EntityProperty"}], AmbiguityFunction -> All][{type, entity, property}]]}, If[FreeQ[res, Failure], EntityValue[FirstCase[res[[2]], Entity[res[[1, 1]], ___]], FirstCase[res[[3]], EntityProperty[res[[1, 1]], ___]]], Missing["Unknown"]]]

将函数应用于不同的实体类、实体和属性.

In[2]:=

NLEntityValue["country", "GB", "oil imports"]

Out[2]=

In[3]:=

NLEntityValue["city", "windy city", "elderly population"]

Out[3]=

In[4]:=

NLEntityValue["celebrity", "the Boss", "birthday"]

Out[4]=

In[5]:=

NLEntityValue["moon", "ganymede", "image"]

Out[5]=

In[6]:=

Row[NLEntityValue["popular curve", #, "image"] & /@ {"trump", "hillary clinton"}]

Out[6]=