if (FALSE) {
## define the LaBB-CAT URL
labbcat.url <- "https://labbcat.canterbury.ac.nz/demo/"
## Get the TextGrid of a recording
textgrid.file <- formatTranscript(labbcat.url, "AP2505_Nelson.eaf",
c("word", "segment"), path="textgrids")
## Get all the transcripts of a given participant
transcript.ids <- getTranscriptIdsWithParticipant(labbcat.url, "AP2505_Nelson")
## Download all the TextGrids, including the utterances, transcript, and segment layers
textgrid.files <- formatTranscript(
labbcat.url, transcript.ids, c("utterance", "word", "segment"))
}
Run the code above in your browser using DataLab