Update report plots labels and colors

Fixes legend in context phylogeny and updates colors in diversity plot

Author: ahmig

config/design_plots.R

@@ -42,8 +42,8 @@ GENE_PALETTE <- c(
 # Nucleotide diversity
 DIVERSITY_PALETTE <- c(
   density_fill = "#fcbf49",
-  density_color = "#eae2b7",
-  value_color = "#d62828",
+  density_color = "#ffaa00",
+  value_color = "#D944AA",
   dnorm_color = "#f77f00"
 )
 
@@ -60,7 +60,7 @@ TREE_NODE_SIZE <- c(
 
 TREE_LEGEND_NAMES <- c(
   tip_label = "Target samples",
-  boot_alrt_pass = "UFBoot ≥ %.2f%s & SH-aLRT ≥ %.2f%s"
+  boot_alrt_pass = "UFBoot ≥ %s%s & SH-aLRT ≥ %s%s"
 )
 
 # Nucleotide variants classification colors and labels

workflow/scripts/report/context_phylogeny_data.R

@@ -20,8 +20,8 @@ source(snakemake@params[["design"]])
 # Format tree label for well supported nodes
 TREE_LEGEND_NAMES["boot_alrt_pass"] <- sprintf(
   TREE_LEGEND_NAMES["boot_alrt_pass"],
-  snakemake@params[["boot_th"]], "%",
-  snakemake@params[["alrt_th"]], "%"
+  100 * snakemake@params[["boot_th"]], "%",
+  100 * snakemake@params[["alrt_th"]], "%"
 )
 
 log_info("Reading tree")

workflow/scripts/report/context_phylogeny_plot.R

@@ -21,8 +21,8 @@ source(snakemake@params[["design"]])
 # Format tree label for well supported nodes
 TREE_LEGEND_NAMES["boot_alrt_pass"] <- sprintf(
   TREE_LEGEND_NAMES["boot_alrt_pass"],
-  snakemake@params[["boot_th"]], "%",
-  snakemake@params[["alrt_th"]], "%"
+  100 * snakemake@params[["boot_th"]], "%",
+  100 * snakemake@params[["alrt_th"]], "%"
 )
 
 log_info("Reading JSON data")