I am trying to subset one reactive data created in R shiny but getting error object of type \'builtin\' is not subsettable
#data