added ggpairs code
This commit is contained in:
parent
318941e91b
commit
22be845e1f
1 changed files with 4 additions and 2 deletions
|
@ -319,7 +319,9 @@ if (tolower(gene)%in%geneL_na){
|
|||
|
||||
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"))
|
||||
, aes(colour = factor(dst_mode), alpha = 0.5)
|
||||
, title="correlogram with ggpairs()") +
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue