Skip to content

Commit

Permalink
Fix doc typo
Browse files Browse the repository at this point in the history
  • Loading branch information
@matdehaven
matdehaven committed Oct 9, 2023
1 parent fbd2b24 commit 8161e89
Show file tree
Hide file tree
Showing 2 changed files with 9 additions and 6 deletions.
8 changes: 4 additions & 4 deletions R/hs.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -21,7 +21,7 @@ hs <- function(

#' Method to calculate hs for svars (id.chol)
#'
#' @param cummulative Boolean.
#' @param cumulative Boolean.
#' Default to False, set to True for cummulative shocks.
#'
#' @rdname hs
Expand All @@ -44,7 +44,7 @@ hs.svars <- function(
factor(impulse_names, levels = impulse_names, ordered = TRUE)

## Get residuals and Sigma
residuals <- resid(x$VAR)
residuals <- stats::resid(x$VAR)
sigma <- x$B
t <- nrow(residuals)

Expand Down Expand Up @@ -74,7 +74,7 @@ hs.svars <- function(

#' Method to calculate hs for fevdvar (id_fevdfd or id_fevdtd)
#'
#' @param cummulative Boolean.
#' @param cumulative Boolean.
#' Default to False, set to True for cummulative shocks.
#'
#' @rdname hs
Expand All @@ -97,7 +97,7 @@ hs.fevdvar <- function(
factor(impulse_names, levels = impulse_names, ordered = TRUE)

## Get residuals and Sigma
residuals <- resid(x$VAR)
residuals <- stats::resid(x$VAR)
sigma <- x$B
t <- nrow(residuals)

Expand Down
7 changes: 5 additions & 2 deletions man/hs.Rd
View file

Some generated files are not rendered by default. Learn more about how customized files appear on GitHub.

0 comments on commit 8161e89

Please sign in to comment.