# NOT RUN {
data(managers)
chart.Regression(managers[, 1:2, drop = FALSE],
managers[, 8, drop = FALSE],
Rf = managers[, 10, drop = FALSE],
excess.returns = TRUE, fit = c("loess", "linear"),
legend.loc = "topleft")
# }
Run the code above in your browser using DataLab