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

minor tweaks in logo and corr plots

Browse source
This commit is contained in:
Tanushree Tunstall 2020-09-17 20:00:34 +01:00
parent bf5854aeaa
commit 91f8707d47
3 changed files with 24 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

9
scripts/plotting/corr_PS_LIG.R
View file

@ -59,6 +59,9 @@ cat(paste0("Variables imported:"
corr_ps = "corr_PS.svg"
plot_corr_ps = paste0(plotdir,"/", corr_ps)
corr_ps_duet_col = "corr_PS_duet_coloured.svg"
plot_corr_ps_duet_col = paste0(plotdir,"/", corr_ps_duet_col)
corr_upper_ps = "corr_upper_PS.svg"
plot_corr_upper_ps = paste0(plotdir,"/", corr_upper_ps)
@ -193,10 +196,12 @@ head(my_corr_ps)
#---------------------------------------
# generate corr PS plot 1: both panels
#---------------------------------------
cat("Corr plot PS:", plot_corr_ps)
cat("Corr plot PS DUET with coloured dots:", plot_corr_ps)
svg(plot_corr_ps, width = 15, height = 15)
#cat("Corr plot PS DUET with coloured dots:",plot_corr_ps_duet_col)
#svg(plot_corr_ps_duet_col, width = 15, height = 15)
OutPlot1 = pairs.panels(my_corr_ps[1:(length(my_corr_ps)-1)]
, method = "spearman" # correlation method
, hist.col = "grey" ##00AFBB