From 0a4be280c39e5789921a249e4022e4559d30469a Mon Sep 17 00:00:00 2001 From: Tanushree Tunstall Date: Wed, 7 Sep 2022 20:03:43 +0100 Subject: [PATCH] various bugfixes --- scripts/functions/bp_subcolours.R | 5 ----- scripts/functions/lineage_dist.R | 4 ++-- 2 files changed, 2 insertions(+), 7 deletions(-) diff --git a/scripts/functions/bp_subcolours.R b/scripts/functions/bp_subcolours.R index 6b8d52c..f89ba85 100755 --- a/scripts/functions/bp_subcolours.R +++ b/scripts/functions/bp_subcolours.R @@ -100,11 +100,6 @@ bp_stability_hmap <- function(plot_df = merged_df3 cat("\nNo. of sub colours generated:", length(subcols_bp_hmap)) anno_bar=position_annotation(plot_df, reorder_position=reorder_position, - aa_pos_drug=aa_pos_drug, - active_aa_pos=active_aa_pos, - aa_pos_lig1=aa_pos_lig1, - aa_pos_lig2=aa_pos_lig2, - aa_pos_lig3=aa_pos_lig3, ... ) diff --git a/scripts/functions/lineage_dist.R b/scripts/functions/lineage_dist.R index e19f2ba..80baaab 100644 --- a/scripts/functions/lineage_dist.R +++ b/scripts/functions/lineage_dist.R @@ -19,7 +19,7 @@ lineage_distP <- function(plotdf , facet_wrap_var = "" # FIXME: document what this is for , fill_categ = "mutation_info_labels" , fill_categ_cols = c("#E69F00", "#999999") - , label_categories = c("LABEL1", "LABEL2") + , label_categories = c("R", "S") , my_ats = 15 # 15 axis text size , my_als = 20 # 20 axis label size , my_leg_ts = 16 #16 @@ -28,7 +28,7 @@ lineage_distP <- function(plotdf , leg_pos = c(0.8, 0.9) , leg_pos_wf = c("top", "left", "bottom", "right") , leg_dir_wf = c("horizontal", "vertical") - , leg_label = "" + , leg_label = "Mutation Group" , alpha = 0.7) {