- 博客(4)
- 收藏
- 关注
原创 使用Rwordseg进行分词
library(Rwordseg)require(Rwordseg)text <- readLines("~/afocus/XYJ_comments.txt")seg <- unlist(segmentCN(text))tag <- table(seg)tbldf <- as.data.frame(tag)freqord <- order(tbldf$Freq, decreasing=
2014-05-16 01:17:32 1977
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人