听起来可能比我想要的更复杂:)因为我对我的情节进行了很多格式化,所以我希望将这一切包装在一个函数中。然而,在绘图调用之前完成一些参数的格式化和设置,并且在绘图调用之后添加图例和图标以及格式化它们。所以我基本上想要一个像:
这样的函数myFormattedPlots<-function(plotFunctionName, plotFunctionParameters...)
参数列表当然取决于函数..但我的图像是这样的:
myFormattedPlots<-function("plot.xts",MyXTSTimeSeries){
par(xpd=FALSE)
...
plot.xts(MyXTSTimeSeries)
grid.raster(logo,x=c(0.05),y=c(0.02),width=0.05,height=0.03)
}
我怎样才能做到这一点?
答案 0 :(得分:4)
你可以在R中给出函数而不是它的名字。你的例子很容易:
myFormattedPlots<-function(func,MyXTSTimeSeries){
par(xpd=FALSE)
func(MyXTSTimeSeries)
grid.raster(logo,x=c(0.05),y=c(0.02),width=0.05,height=0.03)
}
myFormattedPlots(plot.xts, your.time.series)