tm_tag_score(tm)
tm_tag_score()所属R语言包:tm
Compute a Tag Score
计算一个标记分数
译者:生物统计家园网 机器人LoveR
描述----------Description----------
Compute a score based on the number of tags found in a document.
计算的得分的基础上的标签的数量,在文档中找到的。
用法----------Usage----------
## S3 method for class 'term_frequency'
tm_tag_score(x, tags, FUN)
## S3 method for class 'PlainTextDocument'
tm_tag_score(x, tags, FUN = function(x) sum(x, na.rm = TRUE))
## S3 method for class 'TermDocumentMatrix'
tm_tag_score(x, tags, FUN = slam::col_sums)
参数----------Arguments----------
参数:x
Either a PlainTextDocument, a term frequency as returned by termFreq, or a TermDocumentMatrix.
无论是PlainTextDocument,由termFreq或TermDocumentMatrix返回一个术语的频率。
参数:tags
A character vector of tags to be matched.
要匹配一个字符向量的标签。
参数:FUN
A function computing a score from the number of tags matching in x.
一个函数的标签匹配x数计算得分。
值----------Value----------
A score as computed by FUN from the number of matching tags in x.
得分计算FUN的数量匹配tagsx的。
实例----------Examples----------
data("acq")
tm_tag_score(acq[[1]], c("company", "change"))
## Not run: [#不运行:]
## Test for positive and negative sentiments[测试正面和负面的情绪]
## install.packages("tm.plugin.tags", repos = "http://datacube.wu.ac.at")[#install.packages(的“tm.plugin.tags”,回购=的“http://datacube.wu.ac.at”)]
require("tm.plugin.tags")
sapply(acq[1:10], tm_tag_score, tm_get_tags("Positiv"))
sapply(acq[1:10], tm_tag_score, tm_get_tags("Negativ"))
tm_tag_score(TermDocumentMatrix(acq[1:10],
control = list(removePunctuation = TRUE)),
tm_get_tags("Positiv"))
## End(Not run)[#(不执行)]
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
|