diff --git a/scripts/functions/dm_om_data.R b/scripts/functions/dm_om_data.R index d03e170..0bfacb2 100644 --- a/scripts/functions/dm_om_data.R +++ b/scripts/functions/dm_om_data.R @@ -16,10 +16,8 @@ dm_om_wf_lf_data <- function(df #, LigDist_colname # from globals used #, ppi2Dist_colname #from globals used #, naDist_colname #from globals used - , dr_muts = dr_muts_col # from globals - , other_muts = other_muts_col # from globals , snp_colname = "mutationinformation" - , aa_pos_colname = "position" # to sort df by + , aa_pos_colname = "position" , mut_colname = "mutation" , mut_info_colname = "dst_mode" , mut_info_label_colname = "mutation_info_labels" diff --git a/scripts/functions/plotting_globals.R b/scripts/functions/plotting_globals.R index 75c8944..d05bac9 100644 --- a/scripts/functions/plotting_globals.R +++ b/scripts/functions/plotting_globals.R @@ -52,6 +52,7 @@ angstroms_symbol <<- "\u212b" # Delta symbol #=============== delta_symbol <<- "\u0394"; delta_symbol +stability_suffix <- paste0(delta_symbol, delta_symbol, "G") #========== # Colours diff --git a/scripts/plotting/get_plotting_dfs.R b/scripts/plotting/get_plotting_dfs.R index 53ca49a..fdfddec 100644 --- a/scripts/plotting/get_plotting_dfs.R +++ b/scripts/plotting/get_plotting_dfs.R @@ -13,7 +13,7 @@ source("~/git/LSHTM_analysis/scripts/Header_TT.R") # set drug and gene name #========================================== -# variables for lig: +# variables for affinity: # comes from functions/plotting_globals.R #========================================== @@ -21,6 +21,15 @@ cat("\nGlobal variables for Ligand:" , "\nligand distance colname:", LigDist_colname , "\nligand distance cut off:", LigDist_cutoff) +cat("\nGlobal variables for mCSM-PPI2 affinity:" + , "\nPPI2 distance colname:", ppi2Dist_colname + , "\nPPI2 cut off:", Dist_cutoff) + +cat("\nGlobal variables for mCSM-NA affinity:" + , "\nligand distance colname:", naDist_colname + , "\nligand distance cut off:", Dist_cutoff) + + #=========== # input #===========