Построение stl-объекта с настраиваемыми метками оси x с помощью функции plot() или автоплота

Question

Я пытаюсь настроить ось x графика разложения stl. Последовательность моего кода:

1. У меня есть матрица, содержащая индекс, конец каждого месяца и наблюдаемую величину.

MATRIX образец

И так далее, и так далее.

2. создать объект временного ряда и его декомпозицию ,

      m_ts <- ts(MATRIX$magnitude, start = c(year(MATRIX$date[1]), month(year(MATRIX$date[1])), frequency = 12)

decom <- stl(m_ts, s.window = "periodic", 12))

3. Вот где я нахожу свою загадку:

   • Если я использую plot ():

      plot(decom)

Я понимаю график, но даты в десятичном формате.

• тогда как, если я использую autoplot ():

      decom_plot <- autoplot(decom) + scale_x_date(date_breaks = "4 month", date_labels = "%b-%Y") + theme(axis.text.x = element_text(angle = 90))
decom_plot

он позволяет мне настраивать метки даты, но остальной компонент графика имеет другой тип линии, чем с plot (). Однако, поскольку это остаток, я считаю, что лучше всего, чтобы тип линии оставался вертикальным.

Итак, как я могу настроить метки оси x при использовании графика или изменить тип графика при использовании автоплота.

Среди многих я попробовал метод axis(1, xaxp = date), но «параметр xaxp имеет изнанку». Есть какие-нибудь предложения?

Заранее спасибо.