Export hfitted.default method

robjhyndman · Dec 27, 2023 · 681359b · 681359b
1 parent 79883e7
commit 681359b
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 0 deletions.
diff --git a/NAMESPACE b/NAMESPACE
@@ -80,6 +80,7 @@ S3method(getResponse,lm)
 S3method(getResponse,mforecast)
 S3method(getResponse,tbats)
 S3method(head,ts)
+S3method(hfitted,default)
 S3method(logLik,ets)
 S3method(nobs,ets)
 S3method(plot,Arima)

diff --git a/R/forecast.R b/R/forecast.R
@@ -454,6 +454,7 @@ hfitted <- function(object, h=1, FUN=NULL, ...) {
   UseMethod("hfitted")
 }
 
+#' @export
 hfitted.default <- function(object, h=1, FUN=NULL, ...) {
   if (h == 1) {
     return(fitted(object))