if (FALSE) { # rlang::is_installed("plotly") && getRversion() >= "4.5"
brand <- as_brand_yml('
color:
palette:
black: "#1A1A1A"
white: "#F9F9F9"
orange: "#FF6F20"
foreground: black
background: white
primary: orange')
library(plotly)
plot_ly(palmerpenguins::penguins, x = ~bill_length_mm, y = ~bill_depth_mm) |>
theme_brand_plotly(brand)
}
brand <- as_brand_yml('
color:
palette:
black: "#1A1A1A"
white: "#F9F9F9"
orange: "#FF6F20"
foreground: black
background: white
primary: orange')
library(plotly)
plot_ly(mtcars, x = ~wt, y = ~mpg) |>
theme_brand_plotly(brand)
Run the code above in your browser using DataLab