アールメカブ

• バックアップ一覧
• 差分 を表示
• 現在との差分 を表示
• ソース を表示
• RdeKanjiSort へ行く。
  • 1 (2008-10-23 (木) 07:44:15)
  • 2 (2008-10-23 (木) 08:01:38)

Rの備忘録

大仰な。

kanji <- c("黄","紫","青","赤","緑")
x <- paste(kanji, collapse = " ")
write(as.character(x), file = "hoge.txt" )
library(RMeCab)
y <- RMeCabText("hoge.txt")
yomi <- numeric(length(y))
for(i in 1:length(y)){
 yomi[i] <- y[[i]][9]
}
kanji[order(yomi)]
file.remove("hoge.txt")