added more scripts

This commit is contained in:
Tanushree Tunstall 2022-08-24 20:04:29 +01:00
parent 9aed99e805
commit 11b936f09b
9 changed files with 148 additions and 117 deletions

View file

@ -3,29 +3,26 @@ source("/home/tanu/git/LSHTM_analysis/scripts/plotting/plotting_thesis/katg/sens
##############################################################
# PE count
#lig-- na--ppi2--stab
# pe_colour_map = c("DD_lig" = "#ffd700" # gold
# , "SS_lig" = "#f0e68c" # khaki
#
# , "DD_nucleic_acid"= "#a0522d" # sienna
# , "SS_nucleic_acid"= "#d2b48c" # tan
#
# , "DD_ppi2" = "#da70d6" # orchid
# , "SS_ppi2" = "#ff1493" # deeppink
#
# , "DD_stability" = "#f8766d" # red
# , "SS_stability" = "#00BFC4") # blue
#pe_colour_map = c("DD_lig" = "#f0e68c" # khaki
# , "SS_lig" = "#ffd700" # gold
# , "DD_nucleic_acid"= "#d2b48c" # sandybrown
# , "SS_nucleic_acid"= "#a0522d" # sienna
# , "DD_ppi2" = "#da70d6" # orchid
# , "SS_ppi2" = "#ff1493" # deeppink
# , "DD_stability" = "#f8766d" # red
# , "SS_stability" = "#00BFC4") # blue
table(str_df_plot_cols$pe_effect_outcome)
##############################################################
#===========
#PE count
#PE count:
# lig, ppi2, stability
#===========
rects <- data.frame(x=1:6,
colors = c("#ffd700" ,
"#f0e68c" ,
#"#a0522d" ,
#"#d2b48c" ,
colors = c("#f0e68c" ,
"#ffd700" ,
"#da70d6" ,
"#ff1493" ,
@ -37,9 +34,6 @@ rects <- data.frame(x=1:6,
rects$text = c("-ve Lig"
, "+ve Lig"
#, "-ve\nNuc.Acid"
#, "+ve\nNuc.Acid"
, "-ve PPI2"
, "+ve PPI2"