R 月度箱线图

我有一个以这种格式列出销售情况的月度时间序列（因此没有月或年列）：

---

如何按月绘制多箱线图？

如果要使用箱线图显示给定五年期间特定月份的变化，可以尝试：

library(tidyverse)
library(tsibble)

ts(data = sample(100), start = c(2015,1), end = c(2020,12), frequency = 12) %>%  
  as_tsibble() %>% 
  mutate(month = as.factor(month(index))) %>% 
  ggplot(aes(month, value)) +
  geom_boxplot()

library(tidyverse)
library(tsibble)

ts(data = sample(100), start = c(2015,1), end = c(2020,12), frequency = 12) %>%  
  as_tsibble() %>% 
  mutate(month = as.factor(month(index))) %>% 
  ggplot(aes(month, value)) +
  geom_boxplot()