Блог

Главная - Вопросы по программированию - Изменение меток и разрывов с помощью ggplot2 и tsibble

Изменение меток и разрывов с помощью ggplot2 и tsibble

#r #ggplot2 #tsibble

Вопрос:

Поскольку мы не можем использовать scale_x_date() {tsibble} объект, каков подход к изменению разрывов, меток и т. Д.?

 # metapackage
library(fpp3)

# data
melsyd_economy <- ansett %>%
  filter(Airports == "MEL-SYD", Class == "Economy") %>%
  mutate(Passengers = Passengers/1000)

# plot
autoplot(melsyd_economy, Passengers)  
  labs(title = "Ansett airlines economy class",
       subtitle = "Melbourne-Sydney",
       y = "Passengers ('000)")  
  scale_x_date(date_labels = "%Y", date_breaks = "2 year")

Ответ №1:

Проблема не в tsibble том , проблема в том, что ваша Week переменная не относится к классу Date . Но вы можете преобразовать его в а Date , чтобы scale_x_date он работал:

 # metapackage
library(fpp3)

# data
melsyd_economy <- ansett %>%
  filter(Airports == "MEL-SYD", Class == "Economy") %>%
  mutate(Passengers = Passengers/1000) %>% 
  mutate(Week = lubridate::as_date(Week))

# plot
autoplot(melsyd_economy, Passengers)  
  labs(title = "Ansett airlines economy class",
       subtitle = "Melbourne-Sydney",
       y = "Passengers ('000)")  
  scale_x_date(date_labels = "%Y", date_breaks = "2 year")

Метки: