# Loading data from PerformanceAnalytics
data(edhec, package = "PerformanceAnalytics")
class(edhec)
# Changing the data colnames
names(edhec) = c("CA", "CTA", "DIS", "EM", "EMN",
"ED", "FIA", "GM", "LS", "MA",
"RV", "SS", "FOF")
# Cleaning the returns time series for manager data
if(requireNamespace("RobStatTM", quietly = TRUE)) { # CRAN requires conditional execution
outRob <- Return.locScaleRob(edhec$CA)
}
Run the code above in your browser using DataLab