Use more diverging palette for composition by icc genre
Change-Id: I8428f5ec0632ad3b3e8a02ceaea65248bb7e13ff
diff --git a/R/report.Rmd b/R/report.Rmd
index 5f28216..3b2789f 100644
--- a/R/report.Rmd
+++ b/R/report.Rmd
@@ -26,7 +26,8 @@
icc_genre %>% ggplot(aes(x=lang, fill=genre, y=tokens)) +
geom_col() + scale_y_continuous(labels = label_number(scale_cut = cut_short_scale())) +
theme_ids() +
- geom_text(aes(label=if_else(tokens > 0, as.character(tokens), ""), y=tokens), position= position_stack(reverse = F, vjust = 0.5), color="white", size=3.2, family="Fira Sans Condensed")
+ scale_fill_ids() +
+ geom_text(aes(label=if_else(tokens > 0, as.character(tokens), ""), y=tokens), position= position_stack(reverse = F, vjust = 0.5), color="black", size=3.2, family="Fira Sans Condensed")
```