r - r保存多个文件错误

Question

我有一个大字符向量，我想把它分成几个小文件。

我正在使用的代码是：

blogs<-file("./en_US.blogs.txt", open="rb")
blogData<-readLines(blogs, encoding="latin1")
nLines.blog<-NROW(blogData)
close(blogs)
quintil<-round(nLines.blog/19)
qBlog<-split(blogData, ceiling(seq_along(blogData)/quintil))
for(n in names(qBlog))
  write.table(qBlog[[n]],
              file = paste("qBlog",qBlog[[n]], ".txt"))

我收到以下错误：

文件中的错误（文件，ifelse（追加，“a”，“w”））：
无效的“描述”参数
另外：警告消息：
在if（file ==“”）文件中<-stdout（）else if（是.character(file)) { :
条件长度 > 1 并且只使用第一个元素

我做错了什么？