Calculate Average Drawdown

Calculate the average of all drawdowns.

Usage

calc_average_drawdown(equity_curve = NULL, returns = NULL)

Arguments

equity_curve

Numeric vector of equity values

returns

Numeric vector of returns

Value

Numeric value representing average drawdown

Examples

if (FALSE) { # \dontrun{
equity <- c(100, 105, 110, 108, 115, 112, 120)
avg_dd <- calc_average_drawdown(equity_curve = equity)
} # }