library(jiebaR)
wkr = worker()
segment("今天天气好晴朗", wkr)
library(jiebaR)
library(sqldf)
TA = read.csv('R/table-A.csv', header = TRUE, sep = ",")
txtdf = TA$BAK_TXT
TA$BAK_TXT <- as.character(TA$BAK_TXT)
wkr = worker()
|