R 自动打印（并保存）xts对象列表

我有一个很长的

xts

对象列表，我想自动打印并将它们保存到文件夹中（因为手动打印>500个打印需要很长时间）。棘手的部分似乎是将函数应用于

xts

对象的列表。例如，根据列表元素的日期（列表中的每个

xts

对象都是唯一的一天）获取列表元素的通用命名方法，并打印每个对象并将其保存到具有自己名称的文件路径中

可以在以前的帖子中找到数据。每个

xts

元素在列表中都是唯一的一天，带有价格和数量列。我正在使用最新的R（2.15）的xts、TTR和quantmod包

我尝试了以下代码来命名列表元素，这是基于r-bloggers上的一个很好的例子：

names(sample.data.uniquePOS) <- paste0("sample.data.uniquePOS", lapply(sample.data.uniquePOS, function(x) .indexday(sample.data.uniquePOS)))                                                    

同样的问题是，

candleChart

需要应用于

xts

对象而不是列表：

Error in try.xts(x, error = "chartSeries requires an xtsible object") : 
  chartSeries requires an xtsible object

---

我真的很感谢你的帮助

jpg

和

candleChart

未矢量化。在列表上使用循环。@JoshuaUlrich此循环似乎适用于candleChart-

plots1@JoshuaUlrich还尝试了这个
lappy（名称（sample.data.uniquePOS），函数（x）dev.copy2pdf（filename=mypath），candleChart=sample.data.uniquePOS[[x]]）
，但它返回了“list（）”，不确定这是什么意思。还尝试了一个循环：
for（i in 1:length（sample.data.uniquePOS））{filename=paste（“Main”，names（sample.data.uniquePOS），“.jpg”，sep=“”）jpeg（filename）candleChart}
但是它创建了一个jpeg（当jpeg应该和xts对象一样多时），其中没有任何内容。
Error in try.xts(x, error = "chartSeries requires an xtsible object") : 
  chartSeries requires an xtsible object