# NOT RUN {
## define the LaBB-CAT URL
labbcat.url <- "https://labbcat.canterbury.ac.nz/demo/"
## Get attributes for new transcript
corpus <- getCorpusIds(labbcat.url)[1]
transcript.type.layer <- getLayer(labbcat.url, "transcript_type")
transcript.type <- transcript.type.layer$validLabels[[1]]
## upload transcript
newTranscript(
labbcat.url, "my-transcript.eaf", "my-transcript.wav",
"", transcript.type, corpus, "episode-1")
# }
Run the code above in your browser using DataLab