# NOT RUN {
sobj <- multisimrel()
sobj %>%
plot_beta(
base_theme = ggplot2::theme_bw,
lab_list = list(
title = "Regression Coefficients",
subtitle = "From Simulation",
y = "True Regression Coefficients"
),
theme_list = list(
legend.position = "bottom"
)
)
# }
Run the code above in your browser using DataLab