Fixed genome order in output plots

cafe5-GOstats_parser.Rmd

@@ -283,12 +283,13 @@ clean_test_results <- bind_rows(all_tests_all_ontologies)  %>%
          Ontology = str_replace(Ontology, "GOMFID", "Molecular function"),) %>%
     unite(col = "GOTerm", contains("GO"), Term, sep = " ") %>%
   add_count(GOTerm, name = "Significant_in") %>%
-  mutate(Genome = factor(Genome, levels = c("MrilRCEF48713", "MacrCQMa1023", 
+  mutate(Genome = factor(Genome, levels = c("MrilRCEF48713", "MacrCQMa1023",
+                                            "MalbARSEF1941",
                                             "MmajARSEF2973", "MguiARSEF9773",
+                                            "MbruARSEF32973",
                                             "ManiARSEF5493", "ManiBRIP53293",
                                             "ManiE63", "MrobARSEF233",
-                                            "MhumbESALQ1638", "MalbARSEF1941",
-                                            "MbruARSEF32973")))
+                                            "MhumbESALQ1638")))
 
 write_tsv(clean_test_results, file.path(cafe_directory, "overrepresented_GO.tsv"))
 ```