Example of modifying x-axis labels on autospc plot

autospc_example.R

library(tidyverse)
library(lubridate)
library(autospc)

set.seed(20230422L)

df <- tibble(x = seq(from = as.Date("2023-01-01"),
                     to = as.Date("2023-01-31"),
                     by = 1L),
             y = rpois(31L, lambda = 20L))

my_spc_plot <- plot_auto_SPC(df, chartType = "C")

my_spc_plot

my_spc_plot + 
  scale_x_date(date_breaks = "1 week")

my_spc_plot + 
  scale_x_date(date_breaks = "1 week") +
  theme(axis.text.x = element_text(angle = 90))