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")