Export fev function

VFCI · Nov 9, 2023 · 95418d3 · 95418d3
1 parent ad951ce
commit 95418d3
Show file tree

Hide file tree

Showing 3 changed files with 16 additions and 0 deletions.
diff --git a/NAMESPACE b/NAMESPACE
@@ -28,6 +28,7 @@ S3method(plot,fevdirf)
 S3method(plot,fevfd)
 S3method(plot,irffd)
 export(bootstrap)
+export(fev)
 export(fevdfd)
 export(fevfd)
 export(hd)

diff --git a/R/fev.R b/R/fev.R
@@ -5,6 +5,14 @@
 #'
 #' @return forecast error variance
 #'
+#' @export
+#' 
+#' @examples
+#' x <- svars::USA
+#' v <- vars::VAR(x, p = 2)
+#' mvar <- id_fevdtd(v, "pi", 4:10)
+#' fev(mvar)
+#' 
 fev <- function(var, n_ahead = 20) {
   n <- colnames(var$y)
   k <- length(n)

diff --git a/man/fev.Rd b/man/fev.Rd