pred = Forecast$new( dates=sapply( indices, integerIndexToDate, data ) )
forecaster_class_name = getFromNamespace(paste(forecaster,"Forecaster",sep=""), "talweg")
pred = Forecast$new( dates=sapply( indices, integerIndexToDate, data ) )
forecaster_class_name = getFromNamespace(paste(forecaster,"Forecaster",sep=""), "talweg")