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

added outcome col to dm_om data

Browse source
This commit is contained in:
Tanushree Tunstall 2022-08-07 11:21:25 +01:00
parent 54b3dd9d42
commit 4e6f10d1ba
4 changed files with 65 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

2
scripts/plotting/get_plotting_dfs.R
View file

@ -117,7 +117,7 @@ geneL_normal = c("pnca")
geneL_na = c("gid", "rpob")
geneL_ppi2 = c("alr", "embb", "katg", "rpob")
all_dm_om_df = dm_om_wf_lf_data(df = merged_df3, gene_name = gene)
all_dm_om_df = dm_om_wf_lf_data(df = merged_df3, gene = gene)
wf_duet = all_dm_om_df[['wf_duet']]
lf_duet = all_dm_om_df[['lf_duet']]

15
scripts/plotting/plotting_thesis/dm_om_plots.R
View file

@ -1,3 +1,13 @@
#################
# Numbers
##################
nrow(wf_mcsm_lig)
table(wf_mcsm_lig$mutation_info_labels)
nrow(wf_mcsm_ppi2)
table(wf_mcsm_ppi2$mutation_info_labels)
################################################################
geneL_normal = c("pnca")
geneL_na = c("gid", "rpob")
geneL_ppi2 = c("alr", "embb", "katg", "rpob")
@ -116,6 +126,11 @@ stability_suffix <- paste0(delta_symbol, delta_symbol, "G")
lf_bp2(lf_df_stabP, p_title = paste0("Stability",stability_suffix)
, violin_quantiles = c(0.5), monochrome = F)
lf_bp2(lf_duet, p_title = paste0("Stability",stability_suffix)
, violin_quantiles = c(0.5), monochrome = F)
lf_bp2(lf_df_consP, p_title = "Evolutionary Conservation"
, violin_quantiles = c(0.5), monochrome = F)