remove outdated example code

2021-08-03 12:48:32 +02:00
parent 64ede5c757
commit f91456116f
1 changed files with 0 additions and 12 deletions
@@ -227,15 +227,3 @@ read_from_csv <- function(path="csv/") {
         comments = tibble %$% read.table(str_c(path, "comments.csv")),
         applause = tibble %$% read.table(str_c(path, "applause.csv")))
 }
 # -------------------------------
 # EXAMPLE USE
 # make sure data ist downloaded via fetch.R
 # res <- read_one("records/19126-data.xml")
 # 
 # res$redner
 # res$reden
 # res$talks
 # -------------------------------