Example of interactively adding rows / deleting rows by selecting directly in a data.table (DT) in Shiny