# Univariate sorting with periodic rebalancing
data <- data.frame(
permno = 1:500,
date = rep(seq.Date(from = as.Date("2020-01-01"), by = "month", length.out = 100), each = 10),
mktcap_lag = runif(500, 100, 1000),
ret_excess = rnorm(500),
size = runif(500, 50, 150)
)
compute_portfolio_returns(
data, "size", "univariate",
breakpoint_options_main = breakpoint_options(n_portfolios = 5)
)
# Bivariate dependent sorting with annual rebalancing
compute_portfolio_returns(
data, c("size", "mktcap_lag"), "bivariate-independent", 7,
breakpoint_options_main = breakpoint_options(n_portfolios = 5),
breakpoint_options_secondary = breakpoint_options(n_portfolios = 3),
)
Run the code above in your browser using DataLab