Consultas de propriedades de entidades de forma livre
Use Interpreter para construir uma função similar a EntityValue, mas permitindo especificações de linguagem natural EntityType, Entity, e 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"]]]Aplique a função a vários tipos de entidades, entidades e propriedades.
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]=
