R:完全没有做任何事情
问题描述:
我想绘制很多从CSV文件中读取的存储股票数据。基本上,BasketName定义了一个文本文件,其中保存了所有需要的库存标题(库存标题在我的程序中称为变量)。R:完全没有做任何事情
#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
任何想法?
答
如果VariableXTS是一个xts对象,我不相信你正确地调用plot。
检查的XTS包的参考手册的第11页,因为它有一个半页的XTS对象的绘制: http://cran.r-project.org/web/packages/xts/vignettes/xts.pdf
看样子你必须明确地定义轴
什么是'readVariablesFromBasket' ?你永远不会定义它。你对你所做的描述是清楚的。请显示一个小的可重复数据集,以便我们可以验证,例如,“VariableXTS”甚至被创建并包含它。 –