Description Usage Arguments Details Author(s) References Examples
Downside deviation, semideviation, and semivariance are measures of downside risk.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | DownsideDeviation(
R,
MAR = 0,
method = c("full", "subset"),
...,
potential = FALSE
)
DownsidePotential(R, MAR = 0)
SemiDeviation(R, SE = FALSE, SE.control = NULL, ...)
SemiSD(R, SE = FALSE, SE.control = NULL, ...)
SemiVariance(R)
|
R |
an xts, vector, matrix, data frame, timeSeries or zoo object of asset returns |
MAR |
Minimum Acceptable Return, in the same periodicity as your returns |
method |
one of "full" or "subset", indicating whether to use the length of the full series or the length of the subset of the series below the MAR as the denominator, defaults to "full" |
... |
any other passthru parameters |
potential |
if TRUE, calculate downside potential instead, default FALSE |
SE |
TRUE/FALSE whether to ouput the standard errors of the estimates of the risk measures, default FALSE. Only available for |
SE.control |
Control parameters for the computation of standard errors. Should be done using the |
Downside deviation, similar to semi deviation, eliminates positive returns when calculating risk. Instead of using the mean return or zero, it uses the Minimum Acceptable Return as proposed by Sharpe (which may be the mean historical return or zero). It measures the variability of underperformance below a minimum targer rate. The downside variance is the square of the downside potential.
To calculate it, we take the subset of returns that are less than the target (or Minimum Acceptable Returns (MAR)) returns and take the differences of those to the target. We sum the squares and divide by the total number of returns to get a below-target semi-variance.
DownsideDeviation(R, MAR) = sqrt(1/n * sum(t=1..n)((min(R(t)-MAR, 0))^2))
DownsideVariance(R, MAR) = 1/n * sum(t=1..n)((min(R(t)-MAR, 0))^2)
DownsidePotential(R, MAR) = 1/n * sum(t=1..n)(min(R(t)-MAR, 0))
where n is either the number of observations of the entire series or the number of observations in the subset of the series falling below the MAR.
SemiDeviation or SemiVariance is a popular alternative downside risk measure that may be used in place of standard deviation or variance. SemiDeviation and SemiVariance are implemented as a wrapper of DownsideDeviation with MAR=mean(R).
In many functions like Markowitz optimization, semideviation may be substituted directly, and the covariance matrix may be constructed from semideviation or the vector of returns below the mean rather than from variance or the full vector of returns.
In semideviation, by convention, the value of n is set to the full number of observations. In semivariance the the value of n is set to the subset of returns below the mean. It should be noted that while this is the correct mathematical definition of semivariance, this result doesn't make any sense if you are also going to be using the time series of returns below the mean or below a MAR to construct a semi-covariance matrix for portfolio optimization.
Sortino recommends calculating downside deviation utilizing a continuous fitted distribution rather than the discrete distribution of observations. This would have significant utility, especially in cases of a small number of observations. He recommends using a lognormal distribution, or a fitted distribution based on a relevant style index, to construct the returns below the MAR to increase the confidence in the final result. Hopefully, in the future, we'll add a fitted option to this function, and would be happy to accept a contribution of this nature.
Peter Carl, Brian G. Peterson, Matthieu Lestel
Sortino, F. and Price, L. Performance Measurement in a Downside
Risk Framework. Journal of Investing. Fall 1994, 59-65.
Carl Bacon, Practical portfolio performance measurement and attribution,
second edition 2008
Plantinga, A., van der Meer, R. and Sortino, F. The Impact of Downside Risk
on Risk-Adjusted Performance of Mutual Funds in the Euronext Markets. July
19, 2001. Available at SSRN: http://ssrn.com/abstract=277352
http://www.sortino.com/htm/performance.htm see especially end note 10
http://en.wikipedia.org/wiki/Semivariance
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | #with data used in Bacon 2008
data(portfolio_bacon)
MAR = 0.005
DownsideDeviation(portfolio_bacon[,1], MAR) #expected 0.0255
DownsidePotential(portfolio_bacon[,1], MAR) #expected 0.0137
#with data of managers
data(managers)
apply(managers[,1:6], 2, sd, na.rm=TRUE)
DownsideDeviation(managers[,1:6]) # MAR 0%
DownsideDeviation(managers[,1:6], MAR = .04/12) #MAR 4%
SemiDeviation(managers[,1,drop=FALSE])
SemiDeviation(managers[,1:6])
SemiVariance (managers[,1,drop=FALSE])
SemiVariance (managers[,1:6]) #calculated using method="subset"
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.