Descubra que autor escreveu um texto 

Escolha como exemplos alguns dos textos de Shakespeare, Oscar Wilde e Victor Hugo para treinar um classificador.

In[1]:=

X Othello = Import["http://www.gutenberg.org/cache/epub/2267/pg2267.txt"]; Hamlet = Import["http://www.gutenberg.org/cache/epub/2265/pg2265.txt"]; Macbeth = Import["http://www.gutenberg.org/cache/epub/2264/pg2264.txt"];

In[2]:=

X TheImportanceOfBeingEarnest = Import["http://www.gutenberg.org/cache/epub/844/pg844.txt"]; ThePictureofDorianGray = Import["http://www.gutenberg.org/cache/epub/174/pg174.txt"]; AnIdealHusband = Import["http://www.gutenberg.org/files/885/885-0.txt"];

In[3]:=

X LesMiserables = Import["http://www.gutenberg.org/cache/epub/135/pg135.txt"]; NotreDamedeParis = Import["http://www.gutenberg.org/cache/epub/2610/pg2610.txt"]; TheManWhoLaughs = Import["http://www.gutenberg.org/cache/epub/12587/pg12587.txt"];

Gere um classificador de autor a partir dos exemplos de treinamento.

In[4]:=

X author = Classify[<|"William Shakespeare" -> {Othello, Hamlet}, "Oscar Wilde" -> {TheImportanceOfBeingEarnest, ThePictureofDorianGray}, "Victor Hugo" -> {LesMiserables, NotreDamedeParis}|>]

Out[4]=

Descubra qual deles é o autor de textos não contidos no conjunto de treinamento.

In[5]:=

X author[{Macbeth, AnIdealHusband, TheManWhoLaughs}]

Out[5]=