Populating a dropdown menu in DT datatable R Shiny with custom choices

Question

I would like to make a DT datatable in R Shiny that allows users to add choices to the dropdown menus that appear in most cells. The code found here, Edit datatable in Shin