if (FALSE) {
## Get all tokens of "vivid"
vivid.tokens <- getMatches(labbcat.url, "vivid")
## Get mediapipe image annotations for during the tokens
vivid.faces <- vivid.tokens |>
fragmentData(
"mediapipe", path = "png",
start.column=Target.word.start, end.column=Target.word.end)
}
Run the code above in your browser using DataLab