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

added corr plots as function for interactive graphs on shiny

Browse source
This commit is contained in:
Tanushree Tunstall 2021-08-20 18:52:47 +01:00
parent f7aac58081
commit 182465d579
2 changed files with 28 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
scripts/plotting/get_plotting_dfs.R
View file

@ -415,7 +415,7 @@ dim(corr_data_ps)
#--------------------------------------
my_corr_colnames = c("Mutation"
, "DUET"
, "Foldx"
, "FoldX"
#, "Mutation class"
, "ASA"
, "RSA"
@ -476,7 +476,7 @@ if (nrow(corr_ps_df3) == nrow(merged_df3) && nrow(merged_df3_comp) == check1) {
# Data for Correlation plots: LIG
#=================================
cat("\n=========================================="
, "\nCORR PLOTS data: PS"
, "\nCORR PLOTS data: LIG"
, "\n===========================================")
df_lig = merged_df2_lig
@ -577,7 +577,7 @@ if (nrow(corr_lig_df3) == nrow(merged_df3_lig) && nrow(merged_df3_comp_lig) == c
identical(corr_data_lig, corr_lig_df2)
identical(corr_data_ps, corr_ps_df2)
rm(df_ps, df_lig, corr_data_ps, corr_data_lig)
#rm(df_ps, df_lig, corr_data_ps, corr_data_lig)
########################################################################
# End of script