Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/74.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 为什么可以';读取文本文件_R_Text Mining - Fatal编程技术网

R 为什么可以';读取文本文件

R 为什么可以';读取文本文件,r,text-mining,R,Text Mining,试着让R读取我的文本文件并进行文本挖掘,但按照这些步骤它不起作用,不知道出了什么问题。有人能帮帮我吗 library(tm) setwd("E://") path="E:/KEYWORDS" text<-readLines("KEYWORDS.txt") corpus<- Corpus(VectorSource(text)) corpus<- tm_map(corpus,tolower) corpus<- tm_map(corpus,removePunctuation)

试着让R读取我的文本文件并进行文本挖掘,但按照这些步骤它不起作用,不知道出了什么问题。有人能帮帮我吗

library(tm)
setwd("E://")
path="E:/KEYWORDS"
text<-readLines("KEYWORDS.txt")
corpus<- Corpus(VectorSource(text))
corpus<- tm_map(corpus,tolower)
corpus<- tm_map(corpus,removePunctuation)
corpus<-tm_map(corpus,stripWhitespace)
corpus<-Corpus(VectorSource(corpus))
tdm =TermDocumentMatrix(corpus,PlainTextDocument)
findFreTerms(tdm,lowfreq=2)
如果你这样做

str(readLines("KEYWORDS.txt"))
paste(str(readLines("KEYWORDS.txt")),collapse=" ")
text<-paste(str(readLines("KEYWORDS.txt")),collapse=" ")
gsub(pattern="//W", replace="  ", text)
text<-gsub(pattern="//W",replace=" ",text)
gsub(pattern="//d", replace=" ", text)
text<-gsub(pattern="//d", replace=" ", text1)
tolower(text)
text<-tolower(text)
text
str(readLines(“KEYWORDS.txt”))
粘贴(str(readLines(“KEYWORDS.txt”)),collapse=“”)
文本
这是因为您将第二个参数指定给
TermDocumentMatrix
作为
PlainTextDocument
而不是控制参数列表。阅读TermDocumentMatrix的文档,了解什么是有效的控制参数集


你说你是通过“遵循步骤”来完成的,但是你应该首先理解这些步骤。

在你说“如果你这样做了”之后,你的第二个问题是因为
str
设计用于向你显示输出,并且不会返回任何内容,如
帮助(str)
中所述。如果你一次只试一行,你会在第三行看到这种情况,而你的其他行什么也没做。谢谢,我尝试了另一种方式:cname,但如果保持原来的方式让R阅读课文,我能做什么?=-=这是一个单独的问题-整理一下,提出一个新问题。
str(readLines("KEYWORDS.txt"))
paste(str(readLines("KEYWORDS.txt")),collapse=" ")
text<-paste(str(readLines("KEYWORDS.txt")),collapse=" ")
gsub(pattern="//W", replace="  ", text)
text<-gsub(pattern="//W",replace=" ",text)
gsub(pattern="//d", replace=" ", text)
text<-gsub(pattern="//d", replace=" ", text1)
tolower(text)
text<-tolower(text)
text
tdm =TermDocumentMatrix(corpus,PlainTextDocument)
Error: is.list(control) is not TRUE