#tbl %>% add_source(font_size=10, font_style = "italic", font_color = "grey") #kable(df.table, caption="Bee-derived type strains")