colors.R

# scripts to reproduce the analysis and figures from Garrido-Oter et al., 2018
#
# originally by Ruben Garrido-Oter
# garridoo@mpipz.mpg.de

colors <- data.frame(group=c("Bradyrhizobium", "Rhizobium spp.",   "Agrobacterium",
                             "Sinorhizobium", "Mesorhizobium", "Hyphomicrobiaceae",
                             "Methylobacteriaceae",   "Other"),
                     color=c(c_dark_brown,     c_orange,         c_red,
                             c_blue,           c_green,          c_very_dark_green,
                             c_sea_green,             c_black))