flip plot direction and extend README

2021-08-02 23:26:08 +02:00
parent 834a840734
commit 7dd136b869
2 changed files with 6 additions and 1 deletions
@@ -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
@@ -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: