I would like to highlight points in an R plot_ly scatter based on whether the key column matches one of the elements of a query column of the data-point hovered-over by the