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

rearranged corr plot cols and also added example for ggpairs

Browse source
This commit is contained in:
Tanushree Tunstall 2022-08-11 20:56:34 +01:00
parent fdb3f00503
commit b302daaa60
7 changed files with 227 additions and 681 deletions
Download patch file Download diff file Expand all files Collapse all files

14
scripts/functions/corr_plot_data.R
View file

@ -15,6 +15,10 @@ corr_data_extract <- function(df
, extract_scaled_cols = F){
if ( missing(colnames_to_extract) || missing(colnames_display_key) ){
df$maf2 = log10(df$maf) # can't see otherwise
sum(is.na(df$maf2))
cat("\n=========================================="
, "\nCORR PLOTS data: ALL params"
, "\n=========================================")
@ -30,20 +34,22 @@ corr_data_extract <- function(df
common_colnames = c(drug, "dst_mode"
, "duet_stability_change" , "ddg_foldx" , "deepddg" , "ddg_dynamut2"
, "asa" , "rsa" , "kd_values" , "rd_values"
, "maf" , "log10_or_mychisq" , "neglog_pval_fisher"
# previously maf
, "maf2" , "log10_or_mychisq" , "neglog_pval_fisher"
, LigDist_colname
, "consurf_score" , "snap2_score" , "provean_score"
, "ligand_affinity_change"
, "ligand_affinity_change", "mmcsm_lig"
#, "ddg_dynamut", "ddg_encom", "dds_encom", "ddg_mcsm", "ddg_sdm", "ddg_duet"
)
display_common_colnames = c( drug, "dst_mode"
, "DUET" , "FoldX" , "DeepDDG", "Dynamut2"
, "ASA" , "RSA" , "KD" , "RD"
, "MAF" , "Log(OR)" , "-Log(P)"
# previously MAF
, "Log(MAF)" , "Log(OR)" , "-Log(P)"
, "Lig-Dist"
, "ConSurf" , "SNAP2" , "PROVEAN"
, "mCSM-lig"
, "mCSM-lig", "mmCSM-lig"
# , "Dynamut" , "ENCoM-DDG" , "mCSM" , "SDM" , "DUET-d" , "ENCoM-DDS"
)