# \donttest{
sim_data_wdate %>%
radf() %>%
datestamp() %>%
autoplot()
# Change the colour manually
sim_data_wdate %>%
radf() %>%
datestamp() %>%
autoplot() +
ggplot2::scale_colour_manual(values = rep("black", 4))
# }
Run the code above in your browser using DataLab