comm_pct_exp_chart.Rd
Commission as percent of exposure chart
comm_pct_exp_chart(results_df, title, fill_scale, colour_scale)
Results dataframe from rsims backtest
Plot title
ggplot2 fill scale (tickers only)
ggplot2 colour scale (tickers only)
Plot of commission cost as percent of expsoure by ticker and date
if (FALSE) {
tickers = unique(prices$ticker)
my_cols = portfolio_colours(length(tickers))
col_scale <- make_col_scale(my_cols)
fill_scale <- make_fill_scale(my_cols)
results <- cash_backtest(prices, weights)
comm_pct_exp_chart(results, "Commission (% of Exposure)", fill_scale, col_scale)
}