使用分页符合并txt文件

时间:2017-02-21 09:55:53

标签: r

我有一个包含.txt文件的目录,每个文件都包含一串字符。例如I am going to fly to New York

我想要做的是(1)用R读取所有文件,(2)添加一些文本,然后(3)将它们写入一个文件,该文件将所有txt文件连接起来并以分页符分隔。< / p>

我的代码执行步骤(1)和(2)。

files = list.files()
text_list = list()
for(i in 1:length(files)){
  text_list[[i]] = paste(files[i]
                     , readChar(files[i], file.info(files[i])$size)
                     , 'A LITLLE EXTRA TEXT FROM ME'
                     , 'A LITLLE EXTRA TEXT FROM ME 2'
                     , sep='\n\n\n')
}

对于分页符的连接,我想到了这个:

final_statements = do.call(paste, c(text_list, sep='\\newpage'))

如果我运行cat(final_statements),分隔符将被解释为字符串,并且不会添加分页。

"A LITTLE EXTRA TEXT FROM ME 2\newpagebf_99.txt


I have known her"

这是在这里不起作用的分隔符。有没有办法获得一个final_statements文件,我可以写入txt,pdf,doc(无关紧要的格式),text_list的元素是否被分页符分开? 这将节省大量耗时的手动工作。

0 个答案:

没有答案