# NOT RUN {
## define the LaBB-CAT URL
labbcat.url <- "https://labbcat.canterbury.ac.nz/demo/"
## Perform a search
results <- getMatches(labbcat.url, list(segment="I"))
## Get the segment following the token, with alignment if it's been manually aligned
following.segment <- getMatchAlignments(labbcat.url, results$MatchId, "segment",
target.offset=1, anchor.confidence.min=100)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab