added plots for thesis
This commit is contained in:
parent
41c4996426
commit
aabe466599
17 changed files with 24 additions and 2913 deletions
|
@ -96,7 +96,7 @@ site_snp_count_bp <- function (plotdf
|
|||
# but atm being using as plot title
|
||||
#my_leg_title
|
||||
bp_plot_title = paste0("Total nsSNPs: ", tot_muts
|
||||
, ", Total no. of nsSNPs sites: ", tot_sites)
|
||||
, "\nTotal sites: ", tot_sites)
|
||||
|
||||
#-------------
|
||||
# start plot 2
|
||||
|
@ -123,7 +123,8 @@ site_snp_count_bp <- function (plotdf
|
|||
#, legend.text = element_text(size = leg_text_size)
|
||||
#, legend.title = element_text(size = axis_label_size)
|
||||
, plot.title = element_text(size = leg_text_size
|
||||
, colour = title_colour)
|
||||
, colour = title_colour
|
||||
, hjust = 0.5)
|
||||
, plot.subtitle = element_text(size = subtitle_size
|
||||
, hjust = 0.5
|
||||
, colour = subtitle_colour)) +
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue