錯誤書寫時列表的文本文件

Question

我試着寫R包中文提供入口到一個文本文件，但我得到一個錯誤：

pkgs <- unique(installed.packages()[,1]) 
bibs <- lapply(pkgs, function(x) try(citation(x))) 
lapply(bibs, write, "bibs.txt", append=TRUE, ncolumns=1000) 

Error in cat(list(...), file, sep, fill, labels, append) : 
    argument 1 (type 'list') cannot be handled by 'cat' 

我在做什麼錯？

Answer 1

引用的輸出是一個列表，所以錯誤是有道理的。您可以使用toBibtex去那個更容易被write

pkgs <- unique(installed.packages()[,1]) 
bibs <- lapply(pkgs, function(x) try(toBibtex(citation(x)))) 
lapply(bibs, write, "bibs.txt", append=TRUE, ncolumns=1000)