if (FALSE) {
## define the LaBB-CAT URL
labbcat.url <- "https://labbcat.canterbury.ac.nz/demo/"
## get all topic annotations whose label includes the word 'quake'
quake.topics <- getMatchingAnnotations(
labbcat.url, "layer.id == 'topic' && /.*quake.*/.test(label)")
}
Run the code above in your browser using DataLab