added the almost done shiny for barplots subcolours

This commit is contained in:
Tanushree Tunstall 2021-06-30 17:20:04 +01:00
parent c599d28377
commit b679068a5e
6 changed files with 267 additions and 263 deletions

View file

@ -94,7 +94,7 @@ my_df_u$group <- paste0(my_df_u$duet_outcome, "_", my_grp, sep = "")
# Call the function to create the palette based on the group defined above
colours <- ColourPalleteMulti(my_df_u, "duet_outcome", "my_grp")
print(paste0("Colour palette generated for: ", length(colours), " colours"))
my_title = "Protein stability (DUET)"
# axis label size
my_xaxls = 12
@ -104,6 +104,7 @@ my_yaxls = 20
my_xaxts = 18
my_yaxts = 20
my_title = "Protein stability (DUET)"
#********************
# generate plot: PS
# NO axis colours