create genderequality, add documentation read_from_csv

R/parse.R

@@ -223,6 +223,10 @@ write_to_csv <- function(tables, path="csv/", create=F) {
     write.table(tables$applause, str_c(path, "applause.csv"))
 }
 
+#'Create a Tibble out of the CSV-Document
+#'
+#'@param path The path that shows which Documents you want to use.
+#'
 #' @export
 read_from_csv <- function(path="csv/") {
     list(speaker = read.table(str_c(path, "speaker.csv")) %>%