我正在循环中将几个图保存到png文件中。这个效果很好,只要我关闭了R.只要我在RStudio中,所有文件的大小都是0 Kb,因为它们已被其他程序使用而无法打开。这是为什么?我忘记了编码吗?
这是我的循环:
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)
png(file=paste(SaveToDirectory,BasketVariables[i,1],".png",sep=""))
plot(VariableXTS, main=BasketVariables[i,1])
dev.off
}
}
答案 0 :(得分:4)
为了正式结束这个问题,我正在添加我的评论作为答案:
dev.off()
是一个函数,必须后跟圆括号。