Question

我想绘制从CSV文件中读取的大量存储库存数据。基本上，BasketName定义了一个文本文件，其中保存了所有必需的股票头衔（股票头衔在我的程序中称为变量）。

#Goes through all variables in a basket and saves the resulting plots to the specified directory as jpeg files
plotBasketAndSaveToDirectory<-function(BasketName, SaveToDirectory){
    BasketVariables <- readVariablesFromBasket(BasketName)

    for(i in 1:nrow(BasketVariables)){
      VariableCSV<-read.table(getVariableCSVPath(BasketVariables[i,1]),header=TRUE,stringsAsFactors=FALSE,sep=",")
      VariableCSV$Date<-as.Date(as.character(VariableCSV$Date), format="%Y/%m/%d")
      VariableXTS<-xts(VariableCSV$Close, order.by=VariableCSV$Date)
      #jpeg(filename=paste(SaveToDirectory,BasketVariables[1,1],".jpeg",sep=""))
      plot(VariableXTS)
      #dev.off
    }
}

我的函数getVariableCSVPath返回此Basket中股票名称的正确路径。

CSV文件由以下标题构成：

Date High Low Open Close Volume

现在我想用read.table单独读取此购物篮中每个库存（变量）的csv文件并创建一个图并将其保存到光盘。但是，如果我评论整个保存部分，并希望看到情节检查它是否有效，没有任何反应......但我的xts变量正确显示，所有日期都设置。由于周末和假期，也许有些日期缺少，但这不应该是一个问题吗？但该程序没有显示任何错误，它只是没有绘制任何东西。我试图用另一个包中的ChartSeries（）运行它，它显示了这个错误：

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

有什么想法吗？

Answer 1

如果VariableXTS是一个xts对象，我不相信你正确地调用了它。

检查xts包的参考手册的第11页，因为它有一个关于xts对象绘图的半页： http://cran.r-project.org/web/packages/xts/vignettes/xts.pdf

看来你必须明确定义轴

R：根本没有做任何事情

1 个答案: