mecab の出力結果をリストにする。途中経過, , , , 髪が, 新宿御苑, rassoc

2007-11-04 [長年日記]

_ [Scheme] mecab の出力結果をリストにする。途中経過

出力結果をリスト変換の途中結果。ソースと結果。とりあえず、名詞と品詞のペアを出力してくれています。

で、疑問。

- 連続して実行してほしい処理を begin の代わりに let*(あるいは letrec) を使用するのはありなのか？

- 形態素解析する度にインスタンス生成(mecab-new2)とインスタンス破壊(mecab-destroy)を行うのは効率が悪い。クロージャかクラスにしてインスタンスを保持するようにした方がいいのかも。

(use mecab)
;; 形態素解析するよ
(define (morphologic-analysis str)
  (let* ((m (mecab-new2 "-Osimple"))
         (sparse_str (mecab-sparse-tostr m str)))
    (mecab-destroy m)
    sparse_str))
 ;; 本文を形態素解析してリストにする
(define (test str)
  (let* ((ma-str (morphologic-analysis str)) ;形態素解析して
         (strlist (string-split ma-str "\n")) ;リストにして
         (lst (map
               (lambda (x)
                 (string-split x "\t")) strlist))) ;単語と品詞のペアを作る
    lst))

_ 結果。

gosh> (test "私の名前はNarutoです。")
=>(("私" "名詞-代名詞-一般") ("の" "助詞-連体化") ("名前" "名詞-一般") ("は" "助詞-係助詞") ("です" "助動詞") ("。" "記号-句点") ("EOS") (""))

_ [Life] 髪が

真剣にヤバい気がする。

気じゃなくて普通にヤバいっす。

_ [Life] 新宿御苑

パンをもらってご満悦

行ってきました。

新宿御苑。草木がいっぱいです。造られた自然がいっぱいです。緑色の大さと規模のデカさにびっくり。

入場料200円とられますが、200円以上の価値はあると思います。でもあんまり一人で行く場所じゃないかも。一人客よりも芝生の上でのんびりしている家族連れ、カップルが多く見受けられました。

画像は餌付けされていたカルガモ。

_ [Scheme] rassoc

俺メモ

rassoc を使う場合は (use util.list) を実行する必要有り。

本日のツッコミ(全4件) [ツッコミを入れる]

_ 通りすがりの荒らし (2007-11-05 22:03)

鴨だってー！うっけるー。パン外人にもらってたとかってうっけるー。よかったね、お散歩。 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 _ ,.. , _ 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　,. '´:::.::;:::::;::;:｀ヽ, 　　　　　　　　　　　 r- 、.,_　　　　　　　　　　　　/;::.;::;;;;;rｒ‐,:::.::;:::;,::! 　　　　　　　　　ft、　｀ ‐-,、｀.,丶、_　　　　　　　　　 j,',',':;'::::.:｀゛´'':;;;;;;ｒ、;ト、 　　　　　　　　トｊヘ｀>、ｒァ‐L - 、ニ=ァ｀フーァ、.,_　　　!,',',';';';::;::;,;::::..::;:;:.! .ｒ、ヽ、 　　　　　　　　　| ヒ二j!l|:;:;:;:ヾ、_:;{ (__｀丶=>、__r-｀ヽ,i,´:;';','::';;::::;:::::;::..ノ、:｀′:.丶、 　　　　　　　　　Ｖ´三l j!i;;:;:;:rク´ｒ-=三=--ミミjゝシミl:,'::,':::.::;:｀;:ー‐ァ'´丶、_　:::::::::ヽ ＿ __＿ ____　　トy':::.',:;ー-!lr>、ヽ、　ヽr-==、ミj三_!,','::;:::;::;::::...:::;j、_ _＿｀ー一'＿ _ ＿ _＿ ,.　--‐ ' ´　　!ミ彡'〉⌒| l彡ヽr—'⌒ヽ｀ヽ、!l 」ン,;'::::.:,:;:::.:!::,:::、::ヽ　—-　ニ　＿ ,. 　--‐— ' ´　　ト、シ/レr‐、 ';ニ_/ V⌒(´‾ヽ、ヽ三シ/:./::l:::,' ,!:i::;ヽ,:;＼　——- ニ二‾ 二 __ ,. -‐ ニ´ -—　Vヽ/j !|r、r、Vｒ、ヽ、Ｙ´｀く＼>三彡ノ /　j　/!川 l!ヽ＼ヽ　−-- ニ　__‾ _ ,. -‐ -‐ '´- ニ - ヽリ ! l Vヽ !くヽ、_,.二ニ=‐_'´シノ /　/　! l l::! ヽヾ＼ミ＼ ‐- 、｀ヽニ‐- ニ_ r '´,. - ニ-_‐ ニ -　L.,_ヾノヾ、! ', ｒヘ〃辷斗三彡'ツ/ /　jソ川 | ヽ,＼ヽノ　　 _ 二ニ -‐＿ 、　-=ニ二 __＿ _ ___　　｀ー-'⊥ヒ´＿シ三ニ彡ノノ／,.ノ::リ _L⊥=┴ ' ´ -‐ ニ´-‐ 二 - 　｀ー--　ニ　＿−＿二　‐- ニ　＿ _‾ ‾＿‾　二二 ‾--—　ニ二 ‾--— ‐ ｀　ー— ‐ --　ニ＿ __‾＿ —— —　-　ニ　二　-- -—　ニ　‾＿　ニ — 　　　　　　　　　　　　　　　　 ‾　— 二ニ　-— ニ　— 二 ‾__ 二　—

_ 通りすがりの荒らし (2007-11-05 22:04)

バーカバーカ！かーも！ 　　　　　　　,,-—ー-、 　　　　　　/ 　 ,r,　　゛、 　　　 _,,. '＾、　　　　iヾ、 　　　(;;＿＿,..）　　　　i、＿ 　　　　　　＞;;;;;　　　　　 ~゛`ー--、、,,_,,,...--—''つ 　　　　 ,, '"~;;;;;;　　　　　　　　　、　　　　、　　ヲ、 　　　 ,i"　　　　　　　いヾ　　　　ヾヾ　　 _,,-‐" 　　 ┤　　　　　　　　ゝ、_　　　　＿,,,-'"　　_,, ノ 　丶　゛ー--=、,、_,,＿....,,,,...--—''""~　,　'" ,, 　　　ー　、　　＝—　＿　—　"‾

_ 通りすがりの荒らし (2007-11-05 22:12)

,,;- ;, 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　,,;')))　 ;;' 　　　　　　　　　　　　　　　　　　　　　　　　　　　　,;'ヾ））　 ,;' 　　　　　　　　　　　　　　　　　　　　　　　 ,,,,,,,,,,;;''' ミ、、　 ,;' 　　　　　　　　　　　　　　 _____　　　　　,,;;''　　　　　'' ;. 　ノ 　　　　　　　　　　　　　　　　　"''ー-,;;'' 　　　　へ　　　彡'';;, 　　　　　　　　　　　　　　　 ,,,,,,;;;''''ヽ、＼　　　　{ ●}　　　　　';,, 　　　　　　　　　　　　,,,,,,;;;'''' 　--- 、_ヽヽ　　　ヽ'　　　　　彡 ';,,,,.,,.,.,.,.,,.,,._, 　　　　　　　　　,,;''''''''　　　-------、ニ.: : :　　　　　　　　　　　　ミ;;　　　　｀) 　　　　　　,;;'''''',,,,;;''''　　,,　--''"‾ ;'　　　　　　〉::::.　　,-ー、　　ミ　　　 ,,;'' 　,,,-'''''''''''　,,;;''　　　　　 ';;,;.;.;.;.;.;.;.;.; ,;　　｀ー、／ヘ.'　　ヽ● ）　ミ　 ,,;'' （＿＿＿_,;;;　　　　　　　;　;:;:;:;:;:;:;:;:;:;'';,,　: : : :|: : : : :、、　　‾　　 ,,;'' 　　　,,,,;;''　　　　　　　,,;'-⌒'''''⌒'''⌒'''''----'-----｀ー｀ー⌒''''''⌒⌒⌒⌒⌒⌒⌒ ,;;'''''　　　　　　　　'';,,'' ;　　　i　　i　　i　{}　 ,; '';:.:.:.:.:|:.:.:.:|:.:.:.:|.:.:|:..,;' 　'''''''"'''''''"''''''"'''"" ねぇねぇこんなのもあったよ！みなみに似てるよねなるちゃん！ρ( ^ｏ^)b_♪　 って、(・∇・;;) ＝)))）））））ゴホッ！ゴホッ！！ えーーーーーーーっと。 バーカ！バーカ！へへー

_ Naruto (2007-11-05 22:16)

Y ちゃん自重。

[]