flip plot direction and extend README

R/analyze.R

@@ -33,7 +33,7 @@ bar_plot_fraktionen <- function(tb, variable, fill, title=NULL, xlab = "Fraction
         ylab(ylab) +
         labs(fill = filllab) +
         ggtitle(title) +
-        geom_bar(stat = "identity")
+        geom_bar(stat = "identity") + coord_flip()
 }
 
 # Counts how many talks do match a given pattern and summarises by date

README.md

@@ -8,6 +8,11 @@ library(devtools)
 
 # neu laden aller paket funktionen
 load_all()
+
+#In CSV-files schreiben, um das laden zu beschleunigen
+tables <- read_all()
+tables <- repair(tables)
+write_to_csv(tables)
 ```
 Wir verwenden NIEMALS source, etc.! Außerdem NIEMALD library(...) verwenden, sondern
 um neue pakete hinzuzufuegen (als dependency), verwende: