Запросы в свободном формате о сущностях и их свойствах ( Free-Form Entity-Property)
Воспользуемся ресурсом 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]=
