shinydatatable Using shiny datatable to perform text selection datatable contains pair of words, click any pair to select it in the text