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

saving

Browse source
This commit is contained in:
Tanushree Tunstall 2022-08-09 19:58:32 +01:00
parent faf9ab9707
commit 5ef9eb8826
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -8,7 +8,7 @@ all_dm_om_df = dm_om_wf_lf_data(df = merged_df3, gene = gene)
################################################################ ################################################################
#====================== #======================
# Data: Dist+genomics # Data: Dist+Genomics
#====================== #======================
lf_dist_genP = all_dm_om_df[['lf_dist_gen']] lf_dist_genP = all_dm_om_df[['lf_dist_gen']]
wf_dist_genP = all_dm_om_df[['wf_dist_gen']] wf_dist_genP = all_dm_om_df[['wf_dist_gen']]
@ -42,9 +42,9 @@ wilcox.test(wf_dist_genP$`Log10(MAF)`[wf_dist_genP$mutation_info_labels=="R"]
tapply(wf_dist_genP$`Log10(MAF)`, wf_dist_genP$mutation_info_labels, summary) tapply(wf_dist_genP$`Log10(MAF)`, wf_dist_genP$mutation_info_labels, summary)
#------------------- #---------------------------------------
# Distance data plot: not genomics data # Distance data plot: not genomics data
#------------------- #---------------------------------------
dist_dataP = lf_dist_genP[!lf_dist_genP$param_type%in%genomics_param,] dist_dataP = lf_dist_genP[!lf_dist_genP$param_type%in%genomics_param,]
#dist_dataP$param_type = factor(dist_dataP$param_type) #dist_dataP$param_type = factor(dist_dataP$param_type)
table(dist_dataP$param_type) table(dist_dataP$param_type)