suppressPackageStartupMessages(library(timetk))
ts_signature_tbl(
.data = m4_daily
, .date_col = date
) %>%
ts_median_excess_plt(
.date_col = date
, .value_col = value
, .x_axis = month
, .ggplot_group_var = year
, .years_back = 1
)
Run the code above in your browser using DataLab