Create a Text Search Tool Using Feature Extraction
Train a feature extractor from sentences of Alice in Wonderland:
In[1]:=
alice = ExampleData[{"Text", "AliceInWonderland"}];
sentences = TextSentences[alice];
fe = FeatureExtraction[sentences]Out[1]=
Generate a NearestFunction on the extracted features of the dataset.
In[2]:=
nf = Nearest[fe[sentences] -> Automatic]Out[2]=
Construct a function that displays the nearest sentence in Alice in Wonderland and use it on a few sentences.
In[3]:=
nearestalice = sentences[[First@nf[fe[#]]]] &;In[4]:=
nearestalice["Alice and the Rabbit"]Out[4]=
In[5]:=
nearestalice["Off her head"]Out[5]=
