web-dev-qa-db-ja.com

tm_map（...、tolower）を使用したテキストの小文字への変換エラー

tm_mapを使用してみました。次のエラーが発生しました。どうすればこれを回避できますか？

 require(tm)
 byword<-tm_map(byword, tolower)

Error in UseMethod("tm_map", x) : 
  no applicable method for 'tm_map' applied to an object of class "character"
rtmlowercaseterm-document-matrix
48
jackStinger

ベースR関数tolower()を使用します。

tolower(c("THE quick BROWN fox"))
# [1] "the quick brown fox"
101
bdemarest

私の コメント をより詳細な答えに拡大する：tolowerオブジェクトを台無しにしないようにcontent_transformerの内側にVCorpusをラップする必要があります：

> library(tm)
> data('crude')
> crude[[1]]$content
[1] "Diamond Shamrock Corp said that\neffective today it had cut its contract prices for crude oil by\n1.50 dlrs a barrel.\n    The reduction brings its posted price for West Texas\nIntermediate to 16.00 dlrs a barrel, the copany said.\n    \"The price reduction today was made in the light of falling\noil product prices and a weak crude oil market,\" a company\nspokeswoman said.\n    Diamond is the latest in a line of U.S. oil companies that\nhave cut its contract, or posted, prices over the last two days\nciting weak oil markets.\n Reuter"
> tm_map(crude, content_transformer(tolower))[[1]]$content
[1] "diamond shamrock corp said that\neffective today it had cut its contract prices for crude oil by\n1.50 dlrs a barrel.\n    the reduction brings its posted price for west texas\nintermediate to 16.00 dlrs a barrel, the copany said.\n    \"the price reduction today was made in the light of falling\noil product prices and a weak crude oil market,\" a company\nspokeswoman said.\n    diamond is the latest in a line of u.s. oil companies that\nhave cut its contract, or posted, prices over the last two days\nciting weak oil markets.\n reuter"
6
daroczig
myCorpus <- Corpus(VectorSource(byword))
myCorpus <- tm_map(myCorpus , tolower)

print(myCorpus[[1]])
3
Khuyagbaatar Batsuren

この方法でtolowerを使用すると、望ましくない副作用があります。後でコーパスから用語ドキュメントマトリックスを作成しようとすると、失敗します。これは、tmの最近の変更がtolowerの戻り型を処理できないためです。代わりに、次を使用します。

myCorpus <- tm_map(myCorpus, PlainTextDocument)
1
Raja