Cleanup

asl · Apr 23, 2012 · fcc6a44 · fcc6a44
1 parent b0d1dea
commit fcc6a44
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 8 deletions.
diff --git a/R/common.R b/R/common.R
@@ -112,14 +112,6 @@ clusterify <- function(this, ...)
   UseMethod("clusterify");
 calc.v <- function(this, ...)
   UseMethod("calc.v");
-lrf <- function(this, ...)
-  UseMethod("lrf")
-roots <- function(x)
-  UseMethod("roots")
-rforecast <- function(this, ...)
-  UseMethod("rforecast")
-vforecast <- function(this, ...)
-  UseMethod("vforecast")
 
 .object.size <- function(this, ...)
   UseMethod(".object.size")

diff --git a/R/forecast.R b/R/forecast.R
@@ -192,3 +192,12 @@ vforecast.ssa <- function(x, groups, len = 1,
                           ...) {
   stop("generic vector forecast not implemented yet!")
 }
+
+lrf <- function(this, ...)
+  UseMethod("lrf")
+roots <- function(x)
+  UseMethod("roots")
+rforecast <- function(this, ...)
+  UseMethod("rforecast")
+vforecast <- function(this, ...)
+  UseMethod("vforecast")