トップ
新規
一覧
単語検索
最終更新
ヘルプ
ログイン
アールメカブ
R_tmパッケージの使い方
をテンプレートにして作成
開始行:
#contents
* tm パッケージの使い方 [#ld5abf7e]
なお日本語テキストは読み込めない．(lsaパッケージなら，少...
- Excel ファイルのある列にテキストがある場合
td <- tempfile()
dir.create(td)
for(i in 1: nrow(wine00)){
write( as.character(wine00[i, 11]) ,
file = paste(td, paste("D", i, sep=""), sep="/"))
}
...
td.doc <- Corpus(DirSource(td),
readerControl = list(reader = readPlain, l
anguage = "en_US", load = TRUE))
...
unlink(td, recursive=TRUE)
とするしかないのだろうか?
ちなみに，Corpus という関数名は，以前は TextDocCol であっ...
- ファイルの指定
まずファイルをドキュメントクラスとして登録しなくてはいけ...
file.obj <- "/Target/textDir"
alice.DC <- TextDocCol(DirSource(file.obj),
readerControl = list(reader = readPlain,
language = "en_US", load = TRUE))
alice.DC # show(alice.DC)
A text document collection with 1 text document
summary(alice.DC)
inspect(alice.DC)
# 余分な空白を削除
alice.DC2 <- tmMap(alice.DC, stripWhitespace)
# stopWords を削除する
alice.DC3 <- tmMap(alice.DC2, removeWords, stopwords("en...
# Stemming を行う．
alice.DC4 <- tmMap(alice.DC3, stemDoc)
inspect(alice.DC4)
* tm.pdf の説明書に以下の読み込み方式があるが， [#webfca0b]
reut21578 <- system.file("texts", "reut21578", package =...
# tmパッケージのライブラリディレクトリ内のtextsディレクト...
reut21578XML <- system.file("texts", "reut21578.xml",
package = "tm")
# ライブラリディレクトリ内のtextsディレクトリ内のreut2157...
reut21578XMLgz <- system.file("texts", "reut21578.xml.gz...
package = "tm")
# ライブラリディレクトリ内のtextsディレクトリ内のreut2157...
終了行:
#contents
* tm パッケージの使い方 [#ld5abf7e]
なお日本語テキストは読み込めない．(lsaパッケージなら，少...
- Excel ファイルのある列にテキストがある場合
td <- tempfile()
dir.create(td)
for(i in 1: nrow(wine00)){
write( as.character(wine00[i, 11]) ,
file = paste(td, paste("D", i, sep=""), sep="/"))
}
...
td.doc <- Corpus(DirSource(td),
readerControl = list(reader = readPlain, l
anguage = "en_US", load = TRUE))
...
unlink(td, recursive=TRUE)
とするしかないのだろうか?
ちなみに，Corpus という関数名は，以前は TextDocCol であっ...
- ファイルの指定
まずファイルをドキュメントクラスとして登録しなくてはいけ...
file.obj <- "/Target/textDir"
alice.DC <- TextDocCol(DirSource(file.obj),
readerControl = list(reader = readPlain,
language = "en_US", load = TRUE))
alice.DC # show(alice.DC)
A text document collection with 1 text document
summary(alice.DC)
inspect(alice.DC)
# 余分な空白を削除
alice.DC2 <- tmMap(alice.DC, stripWhitespace)
# stopWords を削除する
alice.DC3 <- tmMap(alice.DC2, removeWords, stopwords("en...
# Stemming を行う．
alice.DC4 <- tmMap(alice.DC3, stemDoc)
inspect(alice.DC4)
* tm.pdf の説明書に以下の読み込み方式があるが， [#webfca0b]
reut21578 <- system.file("texts", "reut21578", package =...
# tmパッケージのライブラリディレクトリ内のtextsディレクト...
reut21578XML <- system.file("texts", "reut21578.xml",
package = "tm")
# ライブラリディレクトリ内のtextsディレクトリ内のreut2157...
reut21578XMLgz <- system.file("texts", "reut21578.xml.gz...
package = "tm")
# ライブラリディレクトリ内のtextsディレクトリ内のreut2157...
ページ名:
