После шага summarise
мы можем arrange
строк, используя match
со встроенными month.name
(месяцы в правильном порядке), а затем преобразовать «Месяцы» в factor
с помощью *Указано 1006 * (чтобы его можно было использовать позже в ggplot
для заказа в том же порядке, что и levels
)
library(tidyverse)
df %>%
group_by(Months = months(DateColumn)) %>%
summarise(n = n()) %>%
arrange(match(month.name, Months)) %>%
mutate(Months = factor(Months, levels = Months))
data
df <- data.frame(DateColumn = seq(as.POSIXct("2015-05-10"),
length.out = 30, by = '1 month'))