data(exampleABC, package = "scan")
my_theme <- new_theme() |>
set_panel(color = "red") |>
set_base_text(size = 12, color = "blue") |>
set_dataline(color = "darkred", linewidth = 2)
p1 <- scplot(exampleABC) |> set_theme(my_theme)
Run the code above in your browser using DataLab