theme <- visR::define_theme(
strata = list("SEX" = list(
"F" = "red",
"M" = "blue"
)),
fontsizes = list(
"axis" = 12,
"ticks" = 10,
"legend_title" = 10,
"legend_text" = 8
),
fontfamily = "Helvetica",
grid = list(
"major" = FALSE,
"minor" = FALSE
),
bg = "transparent",
legend_position = "top"
)
Run the code above in your browser using DataLab