tanu/LSHTM_analysis
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

various bugfixes

Browse source
This commit is contained in:
Tanushree Tunstall 2022-09-07 20:03:43 +01:00
parent 590cec5e99
commit 0a4be280c3
2 changed files with 2 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

5
scripts/functions/bp_subcolours.R
View file

@ -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,
...
)

4
scripts/functions/lineage_dist.R
View file

@ -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)
{