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

consurf fixes

Browse source
This commit is contained in:
Tanushree Tunstall 2022-08-04 16:48:37 +01:00
parent bf41d01b39
commit 95131abc3c
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
scripts/functions/wideP_consurf.R
View file

@ -307,7 +307,7 @@ wideP_consurf <- function(plot_df
g1_leg = g1_leg + geom_bar(aes_string(fill = sprintf("factor(%s)" g1_leg = g1_leg + geom_bar(aes_string(fill = sprintf("factor(%s)"
, yvar_colourN_colname))) , yvar_colourN_colname)))
g1_leg = g1_leg + scale_fill_manual(values = consurf_palette2 , name = leg_title1) g1_leg = g1_leg + scale_fill_manual(values = consurf_palette1 , name = leg_title1)
g1_leg g1_leg
legend1 = get_legend(g1_leg) legend1 = get_legend(g1_leg)