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

added correlation plots

Browse source
This commit is contained in:
Tanushree Tunstall 2020-09-09 20:48:21 +01:00
parent 687d5613aa
commit 9476fac83b
3 changed files with 272 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

17
scripts/plotting/lineage_dist_combined_PS.R
View file

@ -53,6 +53,12 @@ cat("Variables imported:"
, "\nother_muts_col:", other_muts_col
, "\ndrtype_col:", resistance_col)
#=======
# output
#=======
lineage_dist_combined = "lineage_dist_combined_PS.svg"
plot_lineage_dist_combined = paste0(plotdir,"/", lineage_dist_combined)
#========================================================================
###########################
# Data for plots
@ -281,13 +287,10 @@ p2 = ggplot(df_dr, aes(x = duet_scaled
print(p2)
#dev.off()
#====================
#combine
#=======
# output
#=======
lineage_dist_combined = "lineage_dist_combined_PS.svg"
plot_lineage_dist_combined = paste0(plotdir,"/", lineage_dist_combined)
########################################################################
#==============
# combine plot
#===============
svg(plot_lineage_dist_combined, width = 12, height = 6)