Hello All, How can I cluster different GO_categories so that it does not look scattered as in my case?

The data frame is provided as an image:

My R code is:

Bubble_plot_5 <- read_excel("GO_Bubble_plot.xlsx", sheet = "GO_5")
 view(Bubble_plot_5)

 ggplot(Bubble_plot_5, aes(y = reorder(GO_Term, as.numeric(GO_Category)), x = Gene_Count,
                              size = Gene_Count))+
      geom_point(aes(color = GO_Category), alpha = 3.0)+
      geom_tile(aes(width = Inf, fill = GO_Category), alpha = 0.4)+
      scale_fill_manual(values = c("green", "red", "blue"))