add documentations

2021-08-06 19:07:35 +02:00
parent 1433159e09
commit d5da636020
7 changed files with 135 additions and 4 deletions
@@ -194,7 +194,7 @@ parse_speechlist <- function(speechlist_xml, date) {
 }

 # create a tibble of speaker from a list of xml nodes representing speaker
-parse_speakerliste <- function(speakerliste_xml) {
+parse_speakerlist <- function(speakerliste_xml) {
    d <- sapply(speakerliste_xml, parse_speaker)
    tibble(id = d["id",],
           vorname = d["vorname",],