Understanding and Fixing the Error 'non-numeric argument to binary operator' in R Shiny Apps