Internal function to plot the diagnostics plot
.diagnostics_plot(Y, fit, res, s, variable, dates)
Y
: observed valuesfit
: fitted valuesres
: residual valuess
: how many observations were lostvariable
: variable to plot: either numeric or column namedates
: vector of dates of length nrow(Y)