Sorting month chronologicaly with arrange() from dplyr

Question

I have a list of month (numeric) that I convert to names:

fd <- df %>%
  select(product, sales, month) %>%
  mutate(month = month.name[month]) %>%
  filter(!is.na(product), sales!=0) %>%
  group_by(month) %>%
  summarise(sales = sum(sales)) %>%
  collect()

I would like to sort the table so that months are presented in chronological order. I'm looking for a solution with arrange() from dplyr if possible.

Here is the result of fd:

       month   sales
1      April 1306629
2     August 1317986
3   December 1263070
4   February 1493914
5    January 1316889
6       July 1323161
7       June 1331614
8      March 1439019
9        May 1369881
10  November 1256950
11   October 1317647
12 September 1229632

Answer 1

How about this approach:

set.seed(12)
df <- data.frame(month = sample(12), x = LETTERS[1:12])
df
#   month x
#1      1 A
#2      9 B
#3     10 C
#4      3 D
#5      2 E
#6     12 F
#7      8 G
#8      4 H
#9      7 I
#10     5 J
#11    11 K
#12     6 L

library(dplyr)
df %>% 
   mutate(month = factor(month.name[month], levels = month.name)) %>% 
   arrange(month)

#       month x
#1    January A
#2   February E
#3      March D
#4      April H
#5        May J
#6       June L
#7       July I
#8     August G
#9  September B
#10   October C
#11  November K
#12  December F