NMeCabの使い方に付いて記載します。

NMeCabは、形態素解析をするMeCabをライブラリ化したものなので、MeCabと同じような使い方になります。

・NMeCabをインポートします。

 

メソッド

  • Parse
  • ParseToNode
  • ParseNBest
  • ParseNBestToNode

 

プロパティ

・AllMorphs（該当する全ての形態素を出力）

  • true：一致する可能性のある全ての形態素を出力
  • false：ベスト解のみ

 
・LatticeLevel（索性レベルを指定する）

  • 0 : 最適解のみが出力可能なレベル（デフォルト、高速）
  • 1 : N-best解が出力可能なレベル（中速）
  • 2 : ソフトわかち書きが可能なレベル（低速）

 
・OutPutFormatType（解析結果のフォーマット）

  • “lattice”：（デファルト）
  • ‘wakati”：分かち書き出力
  • “dump”：全情報を出力
  • “none” ：何もしない
  • “em”：？

 
・Partial（制約付き解析）

  • MeCabでは、文章の中の「この部分は名詞として」、「この部分は動詞として」といった指定をした上で解析するはずですが、現在うまく動作しません。

 
・Theta（係数）

 

Parseメソッドによる解析

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim text = "庭に鶏が２羽います"
    Dim tagger = MeCabTagger.Create()
    TextBox1.Text = tagger.Parse(text)
End Sub

実行結果

庭	名詞,一般,*,*,*,*,庭,ニワ,ニワ
に	助詞,格助詞,一般,*,*,*,に,ニ,ニ
鶏	名詞,一般,*,*,*,*,鶏,ニワトリ,ニワトリ
が	助詞,格助詞,一般,*,*,*,が,ガ,ガ
２	名詞,数,*,*,*,*,２,ニ,ニ
羽	名詞,接尾,助数詞,*,*,*,羽,ワ,ワ
い	動詞,自立,*,*,一段,連用形,いる,イ,イ
ます	助動詞,*,*,*,特殊・マス,基本形,ます,マス,マス
EOS

 

ParseToNodeメソッドによる解析

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim text = "庭に鶏が２羽います"
    Dim tagger = MeCabTagger.Create()
    Dim node = tagger.ParseToNode(text)
    While (node IsNot Nothing)
        ListBox1.Items.Add(node.Surface + ControlChars.Tab + node.Feature)
        node = node.Next
    End While
End Sub

実行結果

庭に鶏が２羽います	BOS/EOS,*,*,*,*,*,*,*,*
庭	名詞,一般,*,*,*,*,庭,ニワ,ニワ
に	助詞,格助詞,一般,*,*,*,に,ニ,ニ
鶏	名詞,一般,*,*,*,*,鶏,ニワトリ,ニワトリ
が	助詞,格助詞,一般,*,*,*,が,ガ,ガ
２	名詞,数,*,*,*,*,２,ニ,ニ
羽	名詞,接尾,助数詞,*,*,*,羽,ワ,ワ
い	動詞,自立,*,*,一段,連用形,いる,イ,イ
ます	助動詞,*,*,*,特殊・マス,基本形,ます,マス,マス

 

ParseNBestメソッドによる解析

N-Best 解の出力

確からしいものから指定個解析結果を出力 します。

Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
    Dim text = "庭に鶏が２羽います"
    Dim tagger = MeCabTagger.Create()
    tagger.LatticeLevel = NMeCab.MeCabLatticeLevel.One
    TextBox1.Text = tagger.ParseNBest(2, text)
End Sub

・LatticeLevelプロパティをOne、Twoにする必要があります。デファルトはZeroです。

実行結果

庭	名詞,一般,*,*,*,*,庭,ニワ,ニワ
に	助詞,格助詞,一般,*,*,*,に,ニ,ニ
鶏	名詞,一般,*,*,*,*,鶏,ニワトリ,ニワトリ
が	助詞,格助詞,一般,*,*,*,が,ガ,ガ
２	名詞,数,*,*,*,*,２,ニ,ニ
羽	名詞,接尾,助数詞,*,*,*,羽,ワ,ワ
い	動詞,自立,*,*,一段,連用形,いる,イ,イ
ます	助動詞,*,*,*,特殊・マス,基本形,ます,マス,マス
EOS
庭	名詞,一般,*,*,*,*,庭,ニワ,ニワ
に	助詞,格助詞,一般,*,*,*,に,ニ,ニ
鶏	名詞,一般,*,*,*,*,鶏,ニワトリ,ニワトリ
が	助詞,格助詞,一般,*,*,*,が,ガ,ガ
２	名詞,数,*,*,*,*,２,ニ,ニ
羽	名詞,接尾,助数詞,*,*,*,羽,ワ,ワ
い	動詞,非自立,*,*,一段,連用形,いる,イ,イ
ます	助動詞,*,*,*,特殊・マス,基本形,ます,マス,マス
EOS

 

ParseNBestToNodeメソッドによる解析

・このメソッドは通常使うことはないと思われます。

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim text = "庭に鶏が２羽います"

    Dim param As NMeCab.MeCabParam = New NMeCab.MeCabParam()
    param.LoadDicRC()
    param.LatticeLevel = NMeCab.MeCabLatticeLevel.One
    param.OutputFormatType = "lattice"
    Dim tagger = NMeCab.MeCabTagger.Create(param)

    Dim os As System.Text.StringBuilder = New System.Text.StringBuilder()
    Dim writer As NMeCab.Core.Writer = New NMeCab.Core.Writer()
    writer.OutputFormatType = param.OutputFormatType

    Dim cnt = 2                                 '必要な解析結果の個数
    For Each node As NMeCab.MeCabNode In tagger.ParseNBestToNode(text)
        writer.Write(os, node)
        cnt = cnt - 1
        If cnt = 0 Then Exit For
    Next

    TextBox1.Text = os.ToString
End Sub