finding seq discrepancy in MSA for embb
This commit is contained in:
parent
af04c69d66
commit
68a092037b
4 changed files with 36 additions and 9 deletions
|
@ -195,10 +195,10 @@ LogoPlotSnps <- function(plot_df
|
|||
cat('\nDone: p0')
|
||||
|
||||
# further customisation
|
||||
mut_logo_p <<- p0 + theme(legend.position = leg_pos
|
||||
mut_logo_p = p0 + theme(legend.position = leg_pos
|
||||
, legend.direction = leg_dir
|
||||
#, legend.title = element_blank()
|
||||
, legend.title = element_text(size = y_tts
|
||||
, legend.title = element_text(size = leg_tts
|
||||
, colour = ytt_col)
|
||||
, legend.text = element_text(size = leg_ts)
|
||||
|
||||
|
@ -246,7 +246,7 @@ LogoPlotSnps <- function(plot_df
|
|||
cat('\nDone: p1')
|
||||
|
||||
# further customisation
|
||||
wt_logo_p <<- p1 +
|
||||
wt_logo_p = p1 +
|
||||
|
||||
theme(legend.position = "none"
|
||||
, legend.direction = leg_dir
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue