fixed the mmseq plotting scripts

2019_GDB/scripts/mmseq_plots_w_metaspades.R

@@ -30,6 +30,7 @@ category <- c(
   "flye",
   "megahit",
   "metaspades",
+  "metaspades_hybrid",
   "flye_megahit",
   "flye_metaspades",
   "flye_metaspades_hybrid",
@@ -49,6 +50,7 @@ Overlap <- expand.grid(  #generate all the combinations
     str_detect(category, sets %>% as.character()) ~ "Y",
     T ~ "N"
   ))
+Overlap[15,3] = "N"         # since metaspades overlaps also with metaspades_hybrid
 
 # Upper-left plot
 upperleft <- Total %>%