Prospect ratio is a ratio used to penalise loss since most people feel loss greater than gain

ProspectRatio(R, MAR, ...)

Arguments

R

an xts, vector, matrix, data frame, timeSeries or zoo object of asset returns

MAR

the minimum acceptable return

...

any other passthru parameters

Details

$$ProspectRatio(R) = \frac{\frac{1}{n}*\sum^{n}_{i=1}(Max(r_i,0)+2.25*Min(r_i,0) - MAR)}{\sigma_D}$$

where \(n\) is the number of observations of the entire series, MAR is the minimum acceptable return and \(\sigma_D\) is the downside risk

References

Carl Bacon, Practical portfolio performance measurement and attribution, second edition 2008 p.100

Author

Matthieu Lestel

Examples

data(portfolio_bacon)
MAR = 0.05
print(ProspectRatio(portfolio_bacon[,1], MAR)) #expected -0.134
#>            [,1]
#> [1,] -0.1347065

data(managers)
MAR = 0
print(ProspectRatio(managers['1996'], MAR))
#>                                HAM1     HAM2     HAM3      HAM4 HAM5 HAM6
#> Prospect ratio (MAR = 0%) 0.9737463 442.1359 1.725605 0.5960639   NA   NA
#>                           EDHEC LS EQ  SP500 TR  US 10Y TR US 3m TR
#> Prospect ratio (MAR = 0%)          NA 0.7975008 -0.7234556      Inf
print(ProspectRatio(managers['1996',1], MAR))
#>           [,1]
#> [1,] 0.9737463