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

sorted combining_dfs.py with all other data files and tidied up get_plotting_dfs.R

Browse source
This commit is contained in:
Tanushree Tunstall 2021-09-10 18:16:41 +01:00
parent 4ba4ff602e
commit 5c8a9e8f00
3 changed files with 111 additions and 76 deletions
Download patch file Download diff file Expand all files Collapse all files

44
scripts/plotting/get_plotting_dfs.R
View file

@ -97,33 +97,33 @@ merged_df3_comp = all_plot_dfs[[4]]
# adding deepddg scaled values
# scale data b/w -1 and 1
#============================
n = which(colnames(merged_df3) == "deepddg"); n
my_min = min(merged_df3[,n]); my_min
my_max = max(merged_df3[,n]); my_max
merged_df3$deepddg_scaled = ifelse(merged_df3[,n] < 0
, merged_df3[,n]/abs(my_min)
, merged_df3[,n]/my_max)
# sanity check
my_min = min(merged_df3$deepddg_scaled); my_min
my_max = max(merged_df3$deepddg_scaled); my_max
if (my_min == -1 && my_max == 1){
cat("\nPASS: DeepDDG successfully scaled b/w -1 and 1"
#, "\nProceeding with assigning deep outcome category")
, "\n")
}else{
cat("\nFAIL: could not scale DeepDDG ddg values"
, "Aborting!")
}
# n = which(colnames(merged_df3) == "deepddg"); n
#
# my_min = min(merged_df3[,n]); my_min
# my_max = max(merged_df3[,n]); my_max
#
# merged_df3$deepddg_scaled = ifelse(merged_df3[,n] < 0
# , merged_df3[,n]/abs(my_min)
# , merged_df3[,n]/my_max)
# # sanity check
# my_min = min(merged_df3$deepddg_scaled); my_min
# my_max = max(merged_df3$deepddg_scaled); my_max
#
# if (my_min == -1 && my_max == 1){
# cat("\nPASS: DeepDDG successfully scaled b/w -1 and 1"
# #, "\nProceeding with assigning deep outcome category")
# , "\n")
# }else{
# cat("\nFAIL: could not scale DeepDDG ddg values"
# , "Aborting!")
# }
#
####################################################################
# Data for combining other dfs
####################################################################
source("other_dfs_data.R")
#source("other_dfs_data.R")
####################################################################
# Data for subcols barplot (~heatmap)