Update fullTable_heatmap_internalComparison_metrics.R

scripts/compare_results/fullTable_heatmap_internalComparison_metrics.R

@@ -18,11 +18,11 @@ selectionOfStats_internalComparisonHeatmap <- fullTableOfStats %>%
   mutate("Comp_Single_BUSCOs_%" = as.numeric(sub("%", "", as.character(`Comp_Single_BUSCOs_%`))))
 
 
-customBlue_max = "#9a5fb4"
+customBlue_max = "#b683c3"
 
 customBlue_min = "#ffccff"
 
-customGray_max = "#8c8c8c"
+customGray_max = "#a6a6a6"
 
 customGray_min = "#e6e6e6"