Como achatar uma lista de listas?

otm pacote estendec de modo que, se dado um conjunto dePlainTextDocuments cria automaticamente umCorpus. Infelizmente, parece que cadaPlainTextDocument deve ser especificado separadamente.

por exemplo. se eu tivesse:

foolist <- list(a, b, c); # where a,b,c are PlainTextDocument objects

Eu faria isso para obter umCorpus:

foocorpus <- c(foolist[[1]], foolist[[2]], foolist[[3]]);

Eu tenho uma lista de listas de'PlainTextDocuments que se parece com isso:

> str(sectioned)
List of 154
 $ :List of 6
  ..$ :Classes 'PlainTextDocument', 'TextDocument', 'character'  atomic [1:1] Developing assessment models   Developing models
  .. .. ..- attr(*, "Author")= chr "John Smith"
  .. .. ..- attr(*, "DateTimeStamp")= POSIXlt[1:1], format: "2013-04-30 12:03:49"
  .. .. ..- attr(*, "Description")= chr(0) 
  .. .. ..- attr(*, "Heading")= chr "Research Focus"
  .. .. ..- attr(*, "ID")= chr(0) 
  .. .. ..- attr(*, "Language")= chr(0) 
  .. .. ..- attr(*, "LocalMetaData")=List of 4
  .. .. .. ..$ foo           : chr "bar"
  .. .. .. ..$ classification: chr "Technician"
  .. .. .. ..$ team          : chr ""
  .. .. .. ..$ supervisor    : chr "Bill Jones"
  .. .. ..- attr(*, "Origin")= chr "Smith-John_e.txt"

#etc., all sublists have 6 elements

Então, para obter todos os meusPlainTextDocuments em umCorpusisso funcionaria:

sectioned.Corpus <- c(sectioned[[1]][[1]], sectioned[[1]][[2]], ..., sectioned[[154]][[6]])

Alguém pode sugerir uma maneira mais fácil, por favor?

ETA:foo<-unlist(foolist, recursive=FALSE) produz uma lista simples de PlainTextDocuments, que ainda me deixa com o problema de alimentar um elemento de lista por elemento parac