man/examples/scale_colour_dft.R

In department-for-transport/dftplotr: Functions to Produce Charts in the DfT Style

## Simple line plot using default palette

library(ggplot2)

df <- economics_long[economics_long$variable %in% c("psavert", "uempmed"), ]

# plot
ggplot(df, aes(x=date)) +
  geom_line(aes(y=value, col=variable), size = 1) +
  scale_colour_dft()+
  theme(axis.text.x = element_text(angle = 90, vjust=0.5, size = 8))  # turn off minor grid