How to accumulate clicked and brushed points in R Shiny and Plotly

Question

I need to build a list of selected points from a graph, using both clicked and brushed points. My code accumulates the points and prints a table under the graph. It works fine