I am trying to create a faceted balloon plot using the ggpubr package in R. However the x-axis and Yaxis automatically get sorted in alphabetic order as shown in the image link. I want the X-axis level order to be "B" "A" "D" "C" "E" in the final plot instead of "A" "B" "C" "D" "E". Please give me some suggestions.
library (readxl)
library(ggpubr)
obs=read_excel("baloon plot.xlsx",sheet = "Sheet2")
my_cols <- c("#0D0887FF", "#6A00A8FF", "#B12A90FF",
             "#E16462FF", "#FCA636FF", "#F0F921FF")
ggballoonplot(as.data.frame(obs), x = "Location", y = "Season",
              size = "NSE", fill = "NSE")+
  gradient_fill(c("blue", "white", "red"))+facet_wrap("Model")+
  guides(size = FALSE)+
  theme_gray() +
  theme(text=element_text(family="Times New Roman", face="bold", size=14, color = "black"))+
  scale_y_discrete(name = "Season") +
  scale_x_discrete(name = "Location")

 
    