Analiză intermediară a portofoliului în R
Ross Bennett
Instructor
Funcțiile obiectiv calculează valoarea obiectivului. În PortfolioAnalytics, pot fi orice funcție R validă.
Măsuri comune de risc al portofoliului
Măsuri comune relative față de benchmark
Funcții definite de utilizator ca funcții obiectiv
Denumirea argumentelor:
R pentru randamentele activelor
weights pentru ponderile portofoliului
mu, sigma, m3, m4 pentru momente
Returnează o singură valoare
# Annualized sharpe ratio
sr_annualized <- function(R, weights, sigma, scale, rfr){
# Geometric annualized return
r <- Return.annualized(Return.portfolio(R, weights), scale = scale)
# Annual excess return
re <- r - rfr
# Annualized portfolio standard deviation
pasd <- sqrt(as.numeric(t(weights) %*%
sigma %*% weights)) * sqrt(scale)
return(re / pasd)
}
data(edhec) asset_returns <- edhec[,1:4]# Setup spec and add constraints port_spec <- portfolio.spec(assets = colnames(asset_returns)) port_spec <- add.constraint(portfolio = port_spec, type = "full_investment") port_spec <- add.constraint(portfolio = port_spec, type = "long_only")# Add custom objective function port_spec <- add.objective(portfolio = port_spec, type = "return", name = "sr_annualized", arguments = list(scale = 12, rfr = 0.02))
Analiză intermediară a portofoliului în R