同一行的大字符元素

我在将大型字符向量的元素导出到csv时遇到问题。我希望每个元素占据一个单元格,但是每个元素都分布在许多不同的行上。 这是我读的课文。

 kaz91 <- readtext("/Uoregon/articoliMiei/Kazakhstan_19/1991/*.txt")
 kaz91 <- texts(kaz91)
 kaz91 <- strsplit(kaz91, "Accessed 19 July 2019.")
kaz91 <- unlist(kaz91) 

然后在运行结构主题模型(structural topic model,stm)之后,我应用以下内容

out<-findThoughts(kas91, texts = kaz91, topics = 1, n = 12, thresh =    NULL, where = NULL, meta = NULL)
lapply(out, function(x) write.table(data.frame(x), 'kaz91t1.csv', 
append= F, sep = "\t" ))

一切都很好,除了csv文件的末尾没有在12行中显示12个元素,而是有很多行,其中12个元素都是分散的。。。 我希望我解释得很得体。

我怀疑解决方案要么是操纵“kaz91”成为一种不同的对象(现在它是一个包含607个元素的大字符),要么是告诉写入表或者数据帧把我需要的结构强加于人。