inst/shiny/multiview/f_color.R

f_get_col_vector60 = function(){
  
  library(RColorBrewer)
  n <- 60
  qual_col_pals = brewer.pal.info[brewer.pal.info$category == 'qual',]
  col_vector = unlist(mapply(brewer.pal, qual_col_pals$maxcolors, rownames(qual_col_pals)))
  
}
erblast/oetteR documentation built on May 27, 2019, 12:11 p.m.