diff --git a/scripts/plotting/plotting_thesis/dm_om_plots.R b/scripts/plotting/plotting_thesis/dm_om_plots.R index 6b18878..cc6351a 100644 --- a/scripts/plotting/plotting_thesis/dm_om_plots.R +++ b/scripts/plotting/plotting_thesis/dm_om_plots.R @@ -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']] 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) -#------------------- +#--------------------------------------- # Distance data plot: not genomics data -#------------------- +#--------------------------------------- dist_dataP = lf_dist_genP[!lf_dist_genP$param_type%in%genomics_param,] #dist_dataP$param_type = factor(dist_dataP$param_type) table(dist_dataP$param_type)