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

added ggpairs code

Browse source
This commit is contained in:
Tanushree Tunstall 2022-08-12 10:04:35 +01:00
parent 318941e91b
commit 22be845e1f
1 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -319,7 +319,9 @@ if (tolower(gene)%in%geneL_na){
svg('/tmp/foo.svg', width=10, height=10, ) svg('/tmp/foo.svg', width=10, height=10, )
ggpairs(corr_df_ps, columns = 1:(ncol(corr_df_ps)-corr_end) corr_plotting_df = corr_df_ps
ggpairs(corr_plotting_df, columns = 1:(ncol(corr_plotting_df)-corr_end)
, upper = list(continuous = wrap('cor', method = "spearman")) , upper = list(continuous = wrap('cor', method = "spearman"))
, aes(colour = factor(dst_mode), alpha = 0.5) , aes(colour = factor(dst_mode), alpha = 0.5)
, title="correlogram with ggpairs()") + , title="correlogram with ggpairs()") +
@ -330,4 +332,4 @@ ggpairs(corr_df_ps, columns = 1:(ncol(corr_df_ps)-corr_end)
dev.off() dev.off()
# #