Re: Accessing Dictionary definitions
- To: mathgroup at smc.vnet.net
- Subject: [mg100152] Re: Accessing Dictionary definitions
- From: "Drago Ganic" <dganic at vodatel.net>
- Date: Tue, 26 May 2009 05:11:28 -0400 (EDT)
- References: <gvdr7e$730$1@smc.vnet.net>
Hi,
here is a bruto force solution:
In[37]:= words = Flatten[WordData[#] & /@ WordData[], 1];
In[38]:= Select[words, Length[#] == 3 && #[[3]] == "VarietyMeat" &]
Out[38]= {{"brain", "Noun", "VarietyMeat"}, {"heart", "Noun",
"VarietyMeat"}, {"liver", "Noun", "VarietyMeat"}, {"tongue", "Noun",
"VarietyMeat"}, {"tripe", "Noun", "VarietyMeat"}}
Greeting from Croatia,
Drago
"Lincoln sievable" <briclark at gmail.com> wrote in message
news:gvdr7e$730$1 at smc.vnet.net...
> Can anyone guide whether Mathematica, can return words that have
> common elements in their Definitions ? For example, WordData["liver",
> "Definitions"] shows" liver" has been given a definition that includes
> {"liver", "Noun", "VarietyMeat"}. Is there a way to, for example,
> return all words that are "VarietyMeat" ?
>
>
>